AH-8092E-MC JAN 1980 


KD11-K COKDAEO soevmont 77-20 SUTH080 


FICHE 1 OF 2 MADE IN USA 





KD11-K BLT AH-8092E-MC JAN 1980 


CQKDAEO copyricHt 77-80 F-OHDORD 


FICHE 2 OF 2 MADE IN USA 





8 1 
CQKDA=E KD11=K BASIC LOGIC TESTS MACY11 30A(7052) 17=SEP=79 09:55 PAGE 2 
CQKDAE .P11 17=SEP=79 09:47 DOCUMENT LISTING SEQ 0001 


1 .SBITL DOCUMENT LISTING 

2 TITLE CQKDAEO, KD11<K BLT 

3 "REM % 

a 

5 

é 

? 

R 

9 

10 

11 
12 

12 
14 
15 
16 

17 
18 
19 
20 ; 
54 
22 
23 
2 PRODUCT CODE: AC-8090E-Mc 
26 PRODUCT NAME:  CQKDAEO kD11-k BLT 
28 PRODUCT DATE: SEPT 1979 

30 MAINTAINER: DIAGNOSTIC ENGINEERING 
32 AUTHOR: JOHN CARMODY \ 

8, 

zs 
% 
37 5 
Se ' . 
oa THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT NOTICE 
40 _.. AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
41 r-. CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY 
“2 “£OR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 
44 hy . 
45 NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF SOFTWARE ON 
us EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR ITS AFFILIATED COMPANIES. 
48 COPYRIGHT (C) 1977,1979, BY DIGITAL EQUIPMENT CORPORATION. 

50 
51 THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION: 
53 

54 DIGITAL PDP UNI BUS MASSBUS 


Se DEC DECUS DEC TAPE 





(QKDAEO, KD11=k_BLT nant estahietid 
Qk DAE P11 17=SEP=79 09:4 


17=SEP=79 09:55 PAGE ,* 


OCUMENT LISTING 


3.0 


4.0 


TABLE OF CONTENTS 


GENERAL FROGRAM INFORMATION 


1.1 PROGRAM PURPOSE 

1.2 SYSTEM REQUIREMENTS 

1.3 RELATED DOCUMENTS AND STANDARDS 
1.4 DIAGNOSTIC HIERARCHY PREREQUISITES 
1.5 FAILURE ASSUMPTIONS 

OPERATING INSTRUCTIONS 

2.1 LOADING AND Ail PROCEDURES 

ree 4 ast ENV I RONMEN 

2.3 ROGRAM OPTIONS 


2.4 EXECUTION TIMES 
ERROR INFORMATION 


3.1 ERROR REPORTING PROCEDURES 
Se2 ERROR HALTS 


FERFORMANCE AND PROGRESS REPORTS 


4.1 PERFORMANCE REPORTS 

4.2 PROGRESS REPORTS 

4.3 MAINTENANCE BREAKPOINT FEATURE 
MAINTENANCE PROCEDURES 

oot THE KD11-K PROCESSOR 


5.2 CONDITION CODE SCOPE SYNC FEATURE 
5.35 ~~ ECO TABLE 


SEQ 0002 





CQKDAEO, KD11=K BLT MACY11 30A(1052) 
COKDAE P11 17=SEP=79 09:47 


97 
98 


ARUN SSBVRARAN=SBRIRARAGLLSS 


mee i a ak a kt a a et st - 
Nonna noNnoNny 3 3 a Ss oS Ss 
oO 


~~ 
WW 
—-O OON 


- a cd ed ed ed ced eed 
BR IRARAR 


1.0 


D 
17=SEP=79 09:55 PAGE 4 
DOCUMENT LISTING 


GENERAL PROGRAM INFORMATION 


""CQKDA’* IS A DIAGNOSTIC PROGRAM DESIGNED TO DETECT, REPORT, 

AND IDENTIFY LOGIC FAULTS IN THE KD11-K CENTRAL PROCESSING UNIT 
OF THE PDP11/6X SYSTEM. IT CONSISTS OF 504(10) INDIVIDUAL TESTS 
CAREFULLY DESIGNED AND SEQUENCED TO DETECT AND ATTEMPT TO 
IDENTIFY LOGIC FAULTS AT A MINIMUM HARDWARE/SOF TWARE LEVEL. 
THESE TESTS ARE PARTITIONED INTO FOUR MAJOR SECTIONS AS 
DESCRIBED BELOW: 


A. BASIC CPU TESTS (BCPT) 


THIS IS THE BASIC CPU TEST TO VERIFY THE ‘HARDCORE'’. ANY FAULT 
DETECTED IN THIS SECTION CAUSES THE PROGRAM TO HALT WITH THE 
PC+2 OF THE HALT INSTRUCTION DISPLAYED ON THE CONSOLE. 


B. BASIC INSTRUCTION TESTS (BIT) 


THIS SECTION CONSISTS OF A LOGICALLY SEQUENCED SET OF BASIC 
INSTRUCTION TESTS DESIGNED TO VERIFY THE INTEGRITY OF THOSE 
INSTRUCTIONS AND LOGIC OPERATIONS USED BY THE UTILITY ROUTINES 
THAT PROVIDE ERROR LOGGING AND SCOPE LOOPING FACILITIES FOR THE 
SUBSEQUENT TWO MAJOR SECTIONS. NO UTILITY IS CALLED UNTIL ITS 
INSTRUCTION COMPLEMENT HAS BEEN VERIFIED. THIS SCHEME ACCOMP- 
LISHES TWO IMPORTANT MAINTENANCE OBJECTIVES: 1)1T MINIMIZES 
THE POSSIBILITY OF THE ERROR REPORTING to CONVEY ING 
AMBIGUOUS ERROR INFORMATION TO THE USER, AND 2)IT MAXIMIZES 
THE POSSIBILITY THAT THE ERROR WILL BE DETECTED BY A ROUTINE 
DESIGNED TO IDENTIFY FAILING OPERATIONS RATHER THAN HAVE THE 
ERROR MANIFEST ITSELF IN A MORE COMPLEX UTILITY ROUTINE 

THAT IS NOT STRUCTURED TO DIAGNOSE FAULTS. 


ANY FAULT DETECTED IN THIS SECTION CAUSES THE PROGRAM TO 

HALT WITH THE CONSOLE ADDRESS INDICATING THE PC+2 OF THE HALT 
INSTRUCTION IN THE FAILING TEST. ADDITIONAL FAULT IDENTIFICATION 
INFORMATION IS AVAILABLE IN be PROCESSOR'S GENERAL REGISTERS, 
PSW, STACK, AND PROGRAM ANNOTATION FOR THE FAILING TEST. : LOCK 
ON HARD ERROR FEATURE IS EMPLOYED TO PREVENT THE PROGRAM FROM 
CONTINUING ON ONCe A SOLID ERROR IS DETECTED. DEPRESSING CONTINUE 
AFTER THE ERROR HALT CAUSES A RETRY OF THE FAILING TEST. 


C. COMPREHENSIVE INSTRUCTION TESTS (CIT) 


THIS SECTION, COMPRISED OF THE BULK OF THE TESTS, CONSISTS 

OF A LOGICALLY SEQUENCED AND PARTITIONED SET OF INSTRUCTION 
TESTS DESIGNED TO TEST AND VERIFY ALL THE BASIC INSTRUCTIONS 
OF THE KD11-K PROCESSOR. THIS EXCLUDES TESTING THOSE LOGIC 
FUNCTIONS THAT SUPPORT THE CONSOLE FUNCTIONS (LOAD ADDRESS, 
DEPOSIT, ETC.). EACH TEST IN THIS SECTION CALLS A ‘‘SCOPE LOQP*’ 


SEQ 0003 
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153 UTILITY THAT FACILITATES USER CONTROL OF TEST SELECTION AND 
154 EXECUTION VIA THE CONSOLE SWITCH REGISTER. 


156 UPON DETECTION OF A LOGIC FAULT, EACH TEST IN THIS SECTION 


= 
vw 
w 


157 CALLS AN ERROR SERVICE'' ROUTINE THAT LOGS THE ERROR AND REP- 
16 ORTS IT AS HARD COPY ON THE CONSOLE TERMINAL DEVICE. THE ERROR 
159 SERVICE ROUTINE ALSG FACILITATES USER CONTROL OF THE PROGRAM 
160 SEQUENCE VIA CONSOLE SWITCH REGISTER OPTIONS. AFTER REPORTING 
161 THE ERROR THE PROGRAM CONTINUES ON IN ITS NORMAL SEQUENCE UN- 
162 LESS MODIFIED BY THE USER ACTIVATING THE ‘LOCK ON HARD ERROR'’ 
163 SWITCH OPTION. 

165 D. COMBINED INSTRUCTION EXERCISER (IEX) 

167 

168 THIS SECTION CONSISTS OF A MORE COMPLEX SET OF INSTRUCTION 

169 TESTS DES!GNED TO TEST THE INSTRUCTIONS WHEN USED IN VARIOUS 
179 COMBINATIONS MANIPULATING VARIABLE DATA PATTERNS. IT ALSO 

171 TESTS THE MED AND ERROR LOGGING FEATURES OF THE CPU. LIKE THE 
172 PREVIOUS SECTION, IT CALLS THE ‘ERROR SERVICE'' AND ‘'SCOPE LOOP"’ 
173 UTILITIES TO REPORT ERRORS AND ALLOW USER CONTROL OF TEST EXEC- 
174 UTION. 

175 

176 1.2 SYSTEM REQUIREMENTS 

178 

129 A, HARDWARE REQUIREMENTS 

181 1. PDP11/6X CPU WITH OPERATOR'S CONSOLE 

182 2. 16K OF CORE STORAGE - MF11/U OR EQUIVALENT 

183 3. DL11=-w ASYNCHRONOUS LINE INTERFACE WITH LINE CLOCK 
185 B. SOFTWARE REQUIREMENTS 

187 1. PDP11 ABSOLUTE LOADER PROGRAM FOR PAPER TAPE SYSTEMS 
188 2. XXDP MONITOR FOR DECTAPE ,MAGTAPE, CASSETTE, OR DISK SYSTEMS. 
190 1.3 RELATED DOCUMENTS AND STANDARDS 

191 eRe narenmpmtianemineRemEEhe 

1 

193 ‘CQKDA'' USES THE STANDARD APT SOFTWARE INTERFACES FOUND IN 

19% THE MACY11 SYSMAC PACKAGES. 

196 14 DIAGNOSTIC HIERARCHY REQUIREMENTS 

198 


199 "*CQKDA’’ WILL NORMALLY BE THE FIRST DIAGNOSTIC TO BE RUN AS 
PART OF PDP 11/6X CPU CHECKOUT. 


FAILURE ASSUMPTIONS 








“*CQKDA’’ ASSUMES THAT THE STORAGE MEDIUM USED TO STORE THE 
PROGRAM IS INTACT AND THAT IT CAN BE LOADED INTO CORE. 


OPERATING INSTRUCTIONS 
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A. LOADING PROCEDURES 


1) STANDARD PDP11 ABSOLUTE LOADER PROCEDURES FOR FAPER TAPE. 


2) STANDARD XXDP MONITOR LOADING PROCEDURES. 
3) STANDARD APT OR ACT LOADING 
B. MANUAL STARTING PROCEDURES 


1) LOAD SWITCH REG WITH QOO00000 (NO SWITCH OPTIONS) 
2) SET DISPLAY TO 000200 

3) DEPRESS LOAD ADDRESS 

4) PRESS CNTRL AND START BUTTONS SIMULTANEOUSLY 


2.2 SPECIAL ENVIRONMENTS 


16K PDP11/6X SERIES SYSTEMS 


FOR 16K SYSTEMS USING THE ‘'XXDP’* PACKAGE YOU WILL BE UNABLE 
TO USE THE ‘UPDATE’’ PROGRAMS TO LOAD, SAVE, UPDATE ETC. 
SINCE THE SIZE OF ‘‘CQKDA’' WILL NOT PERMIT SIMULTANEOUS 
RESIDENCY OF THE UPDATE PROGRAMS. SUFFICIENT FREE CORE IS 
AVAILABLE FOR THE ‘XXDP"’ MONITOR SO THAT ‘'CQKDA’’ CAN BE 
LOADED BY THE MONITOR. 


2.3 PROGRAM OPTIONS 


A. SWITCH REGISTER OPTIONS 


THE FOLLOWING CONSOLE SWITCH REGISTER OPTIONS ARE ACTIVE 
UPON ENTERING THE COMPREHENSIVE INSTRUCTION TESTS (CIT) 
SECTION: (SWITCH OPTION IS ACTIVE WHEN SW IS SET TO A ‘'I'") 


Sw15 HALT ON ERROR, IF ERROR PRINTING IS ENABLED THE HALT 
OCCURS AFTER THE PRINTOUT. DEPRESSING ‘‘CONTINUE'’ CAUSES 
THE PROGRAM TQ PROCEED ON IN NORMAL SEQUENCE [ROM THE 
POINT OF ERROR. 


SwW14 CONTINUOUSLY LOOP ON THE CURRENT TEST 


Sw13 INHIBIT NORMAL ERROR PRINTOUTS = THIS DOES NOT INCLUDF 
POWER FAIL, BUS ERROR, OR RSVD INSTR TRAPS. 


Sw12 INHIBIT ALL PRINTOUTS NOT COVERED Se . g te _THIS 
INCLUDES 1.D., BUS ERROR, AND RSVD INST 
NOTE THAT IT 1S NOT POSSIALE TO INHIBIT REND APASS OR 
POWER FAIL PRINTOUTS. 


G 
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266 Sw] INHIBIT SUB-TEST ITERATIONS. TEST ITERATIONS ARE 
44 AUTOMATICALLY INHIBITED ON THE FIRST PASS. 
269 Sw10 SEARCH FOR AND CONTINUOUSLY LOOP ON THE TEST NUMBER 
270 SELECTED BY THE CONTENTS OF SwW<08:00>. ONLY USE THIS 
271 OPTION FOR TESTS TST176 THRU TST767 SINCE THE ‘‘SCOPE'' 
ele UTILITY IS NOT ACTIVE UNTIL TEST TST176. ‘LOOPING ON 
273 ™ST176 WILL CAUSE A LOOP ON THE ENTIRE ‘BIT'' SECTION 
Ste (TESTS 0-176). 
376 SwO? LOCK ON HARD ERROR 
278 SW<8:0> USED TO SELECT A PARTICULAR TEST FOR LOOPING IF Sw10=1. 
te4 TEST NUMBER MUST BE BETWEEN 176 AND 767. 
ses B. MEMORY LOCATIONS 
283 4. BPTLOC: THERE IS A LOCATION TAGGED ‘'BPTLOC'’ THAT PROVIDES THE 
284 USER THE MECHANISM FOR SETTING SIXTEEN ‘BREAKPOINT 
285 HALTS'' THROUGHOUT THE PROGRAM. THIS ENABLES RAPIDLY 
286 “HOMING IN’' ON THE FAILING TEST IN THOSE CASES WHERE 
287 THE FAULT CAUSES A RUNAWAY OR HUNG PROGRAM. REFER TO 
288 PARA. 4.2 FOR A DETAILED DESCRIPTION OF THE USE OF 
289 THIS FEATURE. 
290 
291 2.4 EXECUTION TIMES 
NIE ge ea i 
394 ONE COMPLETE ERROR FREE PASS OF ‘‘CQKDA'' WITH NO TEST ITERATIONS 
295 SHOULD TAKE LESS THAN 7 SECONDS. A SUCCESSFUL PASS WILL BE IN- 
Soe DICATED BY THE FOLLOWING PRINTOUT ON THE CONSOLE DEVICE: 
+4 END PASS # 000001 ERROR COUNT = 000000 
300 THIS ERROR COUNT IS NOT CLEARED AT THE BEGINNING OF A NEW PASS. 
301 WITH ITERATIONS ENABLED A COMPLETE ERROR FREE PASS SHOULD TAKE 
oe LESS THAN 2.5 MINUTES. 
304 3.0 ERROR INF ORMAT ION 
305 a 
306 
= $3 ERROR REPORTING PROCEDURES 
309 
9 A. ERROR MESSAGE FORMATS 
312 THERE ARE SEVERAL DIFFERENT ERROR FORMATS. EACH IS DESCRIBED BELOw. 
ee 1.) ERROR 1 IS OF THE FORM 
316 $/B DST WAS DST DEST (IR) TEST (PC) (SP) (PSw) 
aba 100000% 000000 000000) 000000) 0000000 0000000 000000 00000 
319 WHERE : 
320 





CQKDAEO, KD11=K_BLT 


CQKDAE P11 


17=SEP=79 09:47 


H 
MACY11 30A(1052) 17=SEP=79 09:55 PAGE 8 


1 


DOCUMENT LISTING 


S/B DST FOR SINGLE AND DOUBLE OPERAND INSTRUCTIONS THIS 
COLUMN CONTAINS WHAT THE RESULT (DEST. OPERAND) 
SHOULD HAVE BEEN (S/B). 


WAS DST FOR SINGLE AND DOUBLE OPERAND INSTRUCTIONS THIS 
COLUMN CONTAINS WHAT THE RESULT (DEST. OPERAND) 
ACTUALLY WAS AFTER THE TEST. 


DEST FOR SINGLE AND DOUBLE OPERAND INSTRUCTIONS THIS 
COLUMN CONTAINS THE DESTINATION ADDRESS. 


(IR) THIS IS A COPY OF THE TEST INSTRUCTION. 
THIS WILL BE THE FIRST WORD IN THE CASE OF TWO 
OR THREE WORD INSTRUCTIONS. 


TEST INDICATES THE TEST NO. (IN OCTAL) THAT FAILED 


(PC) INDICATES THE CONTENTS OF THE PROGRAM COUNTER AT THE 
TIME OF THE ERROR CALL. THIS IS AN ADDRESS NORMAL. ¥ 
USED TO LOCATE THE ERROR CALL STATEMENT IN 
THE FAILING TEST. 


(SP) INDICATES THE CONTENTS OF THE STACK POINTER (R6) AT 
THE TIME OF THE ERROR. NOTE THAT THE ERROR CALL 
WILL PUSH THE STACK TWICE. IN SP TESTS WHERE THE 
SP MUST BE RESTORED PRIOR TO CALLING THE ERROR ROUTINE, 
THEN THE ORIGINAL (UNRESTORED) SP IS TYPED, WITHOUT 
ADDITIONAL PUSHES FROM THE ERROR CALL. 


(PSwW) INDICATES THE CONTENTS OF THE PROCESSOR STATUS WORD 
2T THE TIME OF THE ERROR CALL 


KXXXX TS AN OCTAL NUMBER. 


2.) ERROR 2 AND ERROR 4 ARE THE SAME AS FOR ERROR 1 ABOVE 
EXCEPT THAT IN THIS CASE THE DESTINATION IS A GENERAL 
REGISTER (WHICH DCES NOT HAVE A UNIBUS ADDRESS). THE OCTAL 
NUMBER TYPED OUT IN THE ‘DEST'’ COLUMN SHOULD BE IGNORED. 
THE *YPOUT WOULD LOOK AS FOLLOWS: 


S/B DST WAS DST nt as (IR) TEST (PC) (SP) (PSwW) 


YOOOOOX 


20000000 000000K 000000 0000000 000000 J00000K J 00000K 

3.) ERROR 5, ERROR 6, AND ERROR 7 ARE IDENTICAL TO ERROR 1 
EXCEPT THAT ONLY THE LAST 5,6, OR 7 COLUMNS (RESPECTIVELY) 
ARE PRINTED. 

4.) ERROR 3 IS USED IN CASES WHERE THE STACK POINTER IS 
SPECIFICALLY IN ERROR. THE COLUMNS HAVE THE SAME MEANING AS 
DESCRIBED FOR ERROR 1 EXCEPT: 

S/B SP IS WHAT THE STACK POINTER SHOULD HAVE BEEN (S/B) 


W4S SP IS WHAT THE STACK POINTER ACTUALLY WAS 


SEQ 0007 


Bh Fo NESE ine be oe 
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5.) OTHE 
BY SELF 
AN EXAMP 


BAD DATA READ BY 
PC MEDCODE 
OOOO OOK 


6.) WHEN 
THE TEST 


PE i REG et Ra TR ie es TEES sa TE 
55 PAGE 9 


SEQ 0008 | 


R ERRORS TYPE OUT THEIR SPECIFIC ERROR MESSAGE, FOLLOWED 
tern DATA HEADERS, DEPENDING ON THE ERROR, 
L LLOWS: 


A MED 
EXPECTD RECEIVD 
AAXAKAKKK XXXXKK 


THE SCOPE ROUTINE BECOMES ACTIVE, IT CHECKS THAT 
NUMBER (IN RO) IS EXACTLY ONE GREATER THAN THE 


TEST NUMBER ON THE PREVIOUS SCOPE CALL. IF A MACHINE 


ERROR CA 
BACKWARD 


TESTS SKIPPED 
PC EXPCTD 
XO0000K OOOO" 
EXPCTD 


ACTUAL 
7.) RESE 


4. BUS E 


USES TESTS TO BE SKIPPED, OR THE PROGRAM TO JUMP 
S, ERROR 11 WILL REPORT THIS AS FOLLOWS: 


ACTUAL (TEST #'S) 
OOOO 


THIS IS THE TEST NUMBER THE SCOPE WAS EXPECTING TO BE 
CALLED FROM. 


THIS IS THE TEST NUMBER THAT IT FOUND IN RO 
RVED INSTRUCTION TRAP ERROR MESSAGE 


ANY RESERVED INSTRUCTION TRAP DETECTED AFTER THE 
BASIC TESTS RESULTS IN THE FOLLOWING PRINTOUT: 


TRAPPED TO 10 PC = XXXXXX 


WHERE: XXXXXX IS THE VALUE OF THE PROGRAM COUNTER 
PUSHED ON THE STACK WHEN THE TRAP WAS SPRUNG. 


AFTER REPORTING THE ERROR, THE PROGRAM IS RESTARTED 
FROM THE BEGINNING. 


IF A RSVD INSTRUCTION TRAP OCCURS WHILE IN THE PROCESS 
OF TRYING TO SERVICE A PREVIOUS RSVD INSTRUCTION TRAP 
OR A BUS ERROR TRAP THE PROGRAM HALTS. A DESCRIPTION 
OF THIS HALT IS CONTAINED IN PARA, 3.2.3 BELOW. 


IF A RSVD INSTRUCTION TRAP OCCURS PRIOR TO COMPLETION 
OF THE BASIC INSTRUCTION TEST SECTION THE PROGRAM WILL 
HALT VIA A TRAPCATCHER IN THE VECTOR. A DESCRIPTION UF 
THIS HALT IS DESCRIBED iN PARA. 3.2.2 BELOW. 


RROR TRAP ERROR MESSAGE 


ANY UNEXPECTED BUS ERROR TRAPS (BUS TIMEOUT, ODD 
ADDRESS ERROR, ILLEGAL INSTRUCTION, OR STACK OVERFLOW) 
RESULTS IN THE FOLLOWING PRINTOUT: 


TRAPPED TO 4 PC = KAXKXX 


J 
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433 
434 WHERE: XXXXXX IS THE VALUE OF THE PC PUSHED ONTO 
+4 THE STACK WHEN THE TRAP WAS SPRUNG. 
4 
437 AFTER REPORTING THE ERROR THE PROGRAM IS RESTARTED 
ce FROM THE BEGINNING. 
4 
440 IF A BUS ERROR TRAP OCCURS WHILE A PREVIOUS BUS ERROR 
441 OR RSVD INSTRUCTION IS STILL PENDING THE PROGRAM WILL 
442 HALT. A DESCRIPTION OF THE HALT INTERPRETATION IS GIVEN 
a3 IN PARA. 3.2.3 BELOW. 
445 IF A BUS ERROR OCCURS PRIOR TO THE COMPLETION OF THE 
446 BASIC INSTRUCTION TESTS, THE PROGRAM WILL HALT VIA A 
447 TRAPCATCHER IN THE VECTOR. A DESCRIPTION OF THIS HALT 
rey IS INCLUDED IN PARA. 3.2.2 BELOW. 
450 5. POWER FAIL 
She — eShelf Sa, PL io aol ier AES 
452 
453 IF A POWER FAIL CONDITION IS DETECTED, THE FOLLOWING 
454 MESSAGE IS PRINTED: 
fs POWER 
45 
458 AFTER PRINTING AN ATTEMPT IS MADE TO RESTART THE PROGRAM AT 
459 THE BEGINNING. 
460 
461 . ERROR HALTS 
67. “amo ee ee ereteeeee 
463 
404 1. BASIC INSTRUCTION TESTS (BIT) 
465 a a 
466 
467 ANY ERROR DETECTED IN THE BASIC TESTS CAUSES THE 
468 PROGRAM TO HALT WITH THE PC+2 OF THE LOCATION CONTAINING 
re 4 THE HALT INSTRUCTION DISPLAYED. 
471 EXAMINING THE CONTENTS OF THE CPU'S GENERAL REGISTERS, 
472 THE PSW, AND THE STACK WILL PROVIDE ADDITIONAL FAULT 
on IDENTIFICATION INFORMATION. 
475 DEPRESSING ‘CONTINUE’ AFTER THE HALT WILL CAUSE AN 
476 AUTOMATIC RETRY OF THE FAILING TEST. IF THE ERROR {s 
477 SOLID THE PROGRAM WILL LOCK ON THIS TEST, BUT IF IT 
478 1S INTERMITTENT THE PROGRAM WILL CONTINUE ON IN NORMAL 
rr SEQUENCE ONCE THE TEST IS SUCCESSFULLY EXECUTED. 
& 
481 TO ESTABLISH A TIGHT SCOPE LOOP ON THE FAILING TEST, 
482 REPLACE THE ‘HALT’' WITH A 400(8). AND DEPRESS ‘'CONT INUE"' 
483 THE *400°° IS A ‘BR .+2°' WHICH FUNCTIONS AS A NOP. THIS 
484 IS NECESSARY TO PRESERVE THE INTEGRITY OF THE CONDITION 
485 CODE OPERATE INSTRUCTION THAT IS USED AS A SCOPE SYNC. THIS 
PY BUILT IN SYNC FEATURE IS DESCRIBED IN PARA, 5.0. 

7 


488 2, TRAPCATCHER HALTS 





K 
17=SEP=79 09:55 PAGE 11 
DOCUMENT LISTING 


MACY11 30A(1052) 


CQKDAEO, KD11=K_BLT 
. 17=SEP=79 09:47 


— 


PAVIA SVS IST SIS 
ah a cd ead med al ee ad 


THE VECTOR AREA (LOC 000 = 776) IS PROGRAM LOADED WITH 
A STANDARD TRAPCATCHER AS SHOWN BELOW: 


Vv / V+e 
V+2/ HALT 


AFTER THE BASIC INSTRUCTION TESTS THE FOLLOWING VECTORS 
ARE SET UP TO POINT TO APPROPRIATE SERVICE ROUTINES: 


4/6 BUS ERROR SERVICE 

10/12 RSVD_ INSTRUCTION TRAP SERVICE 
20/22 SCOPE LOOP SERVICE 

24/26 POWER FAIL SERVICE 

30/32 ERROR SERVICE 

34/36 PRINT SERVICE 


AT THE APPROPRIATE POINTS IN THE COMPREHENSIVE INSTR- 
UCTION TESTS THE LINE CLOCK VECTOR (100/102) AND THE DL11 
VECTORS (60/62 - 64/66) ARE SET UP TO CHECK INTERRUPTS 
FROM THESE DEVICES. ALL OTHER VECTORS REMAIN SET UP TO 
""CATCH'’ UNEXPECTED TRAPS OR INTERRUPTS BY HALTING. 


WHEN AN UNEXPECTED TRAP OR INTERRUPT NOT SUPPORTED BY 
AN APPROPRIATE SERVICE ROUTINE OCCURS THE CPU HALTS. 

WITH THE PC+4 OF THE VECTOR DISPLAYED IN THE CONSOLE. 
THIS IS USED TO IDENTIFY THE CAUSE OF THE UNEXPECTED 

TRAP OR INTERRUPT. 


THE LAST ENTRY PUSHED ON THE STACK CAN BE EXAMINED 
TO DETERMINE WHERE THE PROGRAM WAS WHEN THE TRAP OR 
INTERRUPT WAS SPRUNG. REMEMBER THAT THE ‘OLD PC"* GETS 
SAVED ON THE STACK WHEN A TRAP OR INTERRUPT OCCURS. 


3. CATASTROPHIC ERROR HALTS 


E PROGRAM IF 
OCCURS WHILE STILL SERVICING A PREVIOUS BUS ERROR 
OR RSVD_ INSTRUCTION TRAP. AFTER THE HALT THE CONSOLE 
DISPLAYS THE PC+2 OF THE ERROR HALT. THIS IS USED 
TO IDENTIFY WHICH OF THE TWO TYPES OF ERRORS - RSVD 
OR BUS ERROR - OCCURRED LAST. 


THERE IS A SOFTWARE FLAG TAGGED ‘‘CATERR’’ THAT MAY BE 
EXAMINED TO OBTAIN THE FOLLOWING INFORMATION: 


CCATERR] = 000002 TWO SUCCESSIVE BUS ERRORS 

CCATERR] = 001900 TWO SUCCESSIVE RSVD INSTR. TRAPS 

CCATERR) = 000401 A COMBINATION OF THE TWO. THE 
CONTENTS OF THE ADDRESS DISPLAY 
IDENTIFIES WHICH TYPE OCCURRED LAST. 


THE STACK PROVIDES THE FOLLOWING ADDITIONAL INFORMATION: 
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CSP J] / PC OF THE 2ND TRAP 


C[SP+6] / PSW OF THE 1ST TRAP 
PERFORMANCE AND PROGRESS REPORTS 


THERE IS ONLY ONE PERFORMANCE REPORT SUPPLIED BY THE PROGRAM 
AND CONSISTS OF A SIMPLE END OF PASS MESSAGE OF THE FORMAT 
SHOWN BELOW: 

PASCNT = XXXXXX ERRCNT = YYYYYY 


WHERE: XXXXXX IS THE TOTAL NUMBER OF COMPLETE PASSES 
OF THE ENTIRE PROGRAM (OCTA: * 


YYYYYY IS THE TOTAL ERROR COUNT IN OCTAL 
PROGRESS REPORTS 


THERE ARE TWO PROGRESS REPORTS PRINTED THAT REPORT NORMA! 
ERROR FREE EXECUTION OF THE PROGRAM. 


A. END OF PASS PRINTOUT AS DESCRIBED IN 4.1 ABOVE. 
B. PROGRAM IDENTIFICATION MESSAGE AS DESCRIBED BELOW: 
CQKDA KD11-K BASIC LOGIC TESTS 
THIS MESSAGE GETS PRINTED THE FIRST TIME THE PROGRAM ENTERS 


THE COMPREHENSIVE INSTRUCTION TEST SECTION UNLESS 
INHIBITED BY SW12=1. AFTER THE FIRST PASS THIS PRINTOUT 


IS AUTOMATICALLY INHIBITED UNLESS THE PROGRAM IS RESTARTED AT 200(8). 


MAINTENANCE BREAKPOINT FEATURE 


THERE IS_A MANUAL PROGRESS REPORT FEATURE THAT ALLOWS THe USER 
TO STEP THROUGH THE PROGRAM, HALTING AFTER EVERY N‘'TH TEST WITH 
PROGRESS INFORMATION DISPLAYED IN THE CONSOLE ADDRESS DISPLAYS. 
TO ey Ah A od | THIS FEATURE THE USER MUST SET THE DESIRED 
“BREAKPOINT HALT** BITS IN THE MEMORY LOCATION TAGGED ‘BPTLOC"’. 
seb LOCATION PROVIDES SIXTEEN POSSIBLE HALTS DISPERSED EVENLY 

HROUGHOUT THE PROGRAM (APPROX. EVERY 20 TESTS). AT EACH CHECK~ 
POINT THE PROGRAM EXAMINES A PARTICULAR BIT IN ‘BPTLOC’* AND 
HALTS IF THE BIT IS SET TO A *"l’* OTHERWISE IT CONTINUES IN 
NORMAL SEQUENCE. AFTER THE HALT DEPRESSING *‘CONTINUE'" WILL CAUSE 
RESUMPTION OF NORMAL PROGRAM EXECUTION. SETTING LOCATION ‘BPTLOC** 
TO ALL 1°S (177777) WILL RESULT IN THE FOLLOWING SIXTEEN HALTS 
WITH THE INFORMATION SHOWN DISPLAYED IN THE CONSOLE: 


SEQ 0011 
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CBPTLOCJ nage thw 
+ 


em a ed ed od od = oo) 3 = 


NOTE: IF THE USER DEPOSITED A 000400(8) IN LOCATION ‘BPTLOC'’ 
ONLY ONE HALT WOULD OCCUR AND AT THAT TIME THE 
DISPLAY SHOULD CONTAIN 27162. 


THIS Hats J IS USEFUL FOR TRACKING DOWN THE TEST THAT CAUSES 
A ''RUNAWAY'' OR ''HUNG'’ PROGRAM. 


LOCATION ‘BPTLOC’’ IS PROGRAM LOADED AS 000000 TO INHIBIT ANY HALTS. 


MAINTENANCE PROCEDURES 


THE PROCEDURES OUTLINED IN THIS SECTION ASSUME THAT ‘‘CQKDA"’ 
CAN BE ED INTO CORE AND STARTED. IF THE FAILURE MODE 
PREVENTS PROGRAM LOADING OR AFFECTS NORMAL POWER UP AND 
CONSOLE OPERATIONS, THE TECHNICIAN MUST REVERT TO THE MANUAL 
DEBUG AND CHECKOUT PROCEDURES. 


THE KD11-K CENTRAL PROCESSING UNIT CAN BE VIEWED AS 
CONSISTING OF TWO MAJOR LOGIC AREAS AS DEPICTED BELOW: 


DATA IN *x*%** 
oa 


RARER KAEREEKEE RRERKEKREKRKRKEEKRE REE 
* w * *® 
* CONTROL &>>>>>>>>>>>>>" DATA * 
* SECTION BERK KE PATHS * 


* & *® » 
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RARER REE RETAKE EK 
* 


*® 
***>DATA OUT 


THE DATA PATHS CONSIST OF A LOGICALLY INTERCONNECTED GROUP 
OF STATIC DATA FACILITIES (REGISTERS, MULTIPLEXORS, ALU'S 
ETC.) REQUIRED TO TEMPORARILY STORE, MODIFY, AND TRANSFER 
DATA ITEMS (16 BIT WORDS OR 8 BIT BYTES) ACCORDING TO THE 
DESIGN SPECIFICATIONS FOR THE PDP11. 


THE CONTROL SECTION SUPPLIES PREDEFINED SEQUENCES OF CONTROL 
SIGNAL SETS TO ACTIVATE THE REQUIRED DATA FACILITIES WITHIN 
THE DATA PATHS. IN THE KD11-K THESE CONTROL SIGNAL SETS ARE 
STORED IN A READ ONLY MEMORY (ROM) AND GENERATED BY READING 
ces SEQUENCE OF ROM WORDS FOR EACH OPERATION TO BE 


THE SEQUENCE GENERATED BY THE CONTROL SECTION IS VARIABLE 
AND DEPENDENT UPON THE INSTRUCTION OR LOGIC OPERATION 
BEING EXECUTED. THERE ARE HUNDREDS OF THESE SEQUENCES POSS- 
IBLE DEPENDENT UPON OF THE PROGRAM CODING. 


""CQKDA’' IS DESIGNED TO GENERATE ALL POSSIBLE MICROINSTRUCTION 

SEQUENCES AND COMBINATIONS OF DATA AND CONTROL SIGNALS. THE 

INDIVIDUAL TESTS ARE LOGICALLY SEQUENCED AND STRUCTURED TO 

cate. AND ISOLATE PARTICULAR MICROPROGRAM SEQUENCES THAT ARE 
ULT 


5.2 CONDITION CODE SCOPE SYNC FEATURE 


FROM THE BIT SECTION TO THE MED TESTS IN THE CIT SECTION, ALL 
TEST INSTRUCTIONS ARE PRECEEDED BY A CONDITION CODE OPERATE 
INSTRUCTION. THE UBREAK REGISTER IS PROGRAM LOADED ha. gees 


EXECUTION. THIS PULSE IS GENERATED ON BACKPLANE PIN BO3M2 AND 
MAY BE USED IN CONJUNTION WITH THE PROGRAM LOOPING FEATURES TO 
PROBE THE KD11-K DURING THE FAILING TEST. 


ARK EERE EERE EERE RAR 

5.3 ECO TABLE 
CHGD1 - ADD REV C1 PATCH TO ag TIMEOUT TEST #762 
CHGE1 = CLEAR PSW AT TEST STAR 


ERE ee te edhe hee BS ered 


-TITLE CQKDA-E KD11-K BASIC LOGIC TESTS 
*COPYRIGHT (C) 1977,1979 

;*DIGITAL EQUIPMENT CORP. 

;*MAYNARD, MASS. 01754 


-* 
’ 


Se THIS PROGRAM WAS ASSEMBLED USING THE PDP=11 MAINDEC SYSMAC 


SEQ 0013 


CQKDA=E KD11-K BAS! 


CQKDAE .P11 


C LOG 
17-SEP-79 


00 
177776 


177774 
177772 
177570 
177570 


IC TE 
09:47 


STS 


MACY11 30A(1052) 
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B 2 
17=SEP=79 09:55 PAGE 15 


s #PACKAGE (MAINDEC=11=DZQAC-C3), JAN 19, 1977. 
*SBTTL OPERATJONAL SWITCH SETTINGS 


SWITCH 


s. ee ee ee 
a 


Se ee 
* 


“ENABLE ABS 


HA!.T ON ERROR 

LOOP ON TEST 

INHIBIT ERROR TYPEOUTS 

INHIBIT ID MESSAGE & UNEXPECTED TRAP MESSAGES 
INHIBIT ITERATIONS 

LOOP ON i 3 IN SWR<8:0> 

LOOP ON ERR 


-SBTTL BASIC DEFINITIONS 
iia. too OF THE STACK POINTER aes 1000 *** 


STACK= 


-EQUIV. EMT,ERROR 
“EQUIV I0T,SCOPE 


ovtascme | pus seothaneres 


LF= 12 

CR= 15 
CRLF= 200 
PS= 177776 


DDISP= 177570 


sBASIC DEFINITION OF ERROR CALL 
 IBASIC DEFINITION OF SCOPE CALL 


+ CODE FOR HORIZONTAL TAB 
CODE FOR LINE FEED 
CODE FOR CARRIAGE RETURN 
;-CODE FOR CARRIAGE RETURN-LINE FEED 
; PROCESSOR STATUS WORD 


oh tes LIMIT REGISTER 
;PROGRAM INTERRUPT REQUEST REGISTER 
; :HARDWARE SWITCH REGISTER 
; ;HARDWARE DISPLAY REGISTER 


t 


— REGISTER DEFINITIONS 


R1=. %1 

R2= %2 

R3= %3 

R4= %4 

R5= x5 

R6= %6 

R7= %7 

SP= %6 

PC= %7 

PRO= 

PR1= 40 

PR2= 100 
PR3= 140 
PR4= 200 
PR5= 240 
PR6= 300 
PR7= 340 


s*PRIORITY LEVEL DEFINITIONS 
0 ;;PRIOR 


: GENERAL REGISTER 
; GENERAL REGISTER 
; GENERAL REGISTER 


: ¢ GENERAL REGISTER 

;;GENERAL REGISTER 

:: STACK POINTER 
PROGRAM COUNTER 


ll 
a, 
ot 
~< 
= 
m 
<= 
m 
= 
NOWESWN HO 


:zPRIORITY LEVEL 


p*'‘SWITCH REGISTER’’ SWITCH DEFINITIONS 


a 


SEQ 0014 


CQKDA=E KD11-K BAS! 


CQKDAE .P11 


17=SEP= 


mela) 
3 


a 
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BASIC DEFINITIONS 
SwWi5= 100000 


Sw14= 40000 
Swi3= 20000 
Swi2= 10000 
Sw11= 4000 
Sw10= 2000 
Swo9= 1000 
SwO8= 400 
SwO7= 200 
SwO6= 100 
SwOS= 40 
SwO4= 20 
Sw03= 10 
Sw02= 4 
SwOl= 2 
SwooO= 1 


BIT15= 


BIT10= 2000 
BITO9= 1000 
BITO8= 400 
BITO7= 200 
BITC6= 100 
BITOS= 40 
BITO4= 20 
BITO3= 10 
BITO2= 4 
BITO1= 2 
BI T00= 

EQUIV B 119 


“EQUIV BITOO.BITO 
:*BASIC “'CPU'' TRAP VECTOR ADDRESSES 


SEQ 0015 


CQKDA=E KD11=K BAS 


CQKDAE .P11 


000174 
000176 


000200 


000024 


000046 
000052 


mn 

U-> 
i] 

Yy 

2) 


17-8 


000137 
000700 


000000 
001120 
000000 


000C00 
000014 


001630 


De 
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ERRVEC= 4 ;:TIME OUT AND OTHER ERRORS 

RESVEC= 10 : RESeayeD AND ILLEGAL INSTRUCTIONS 
TBITVEC=14 BIT 

TRIVEC= 14 : TRACE TRAP 

BPTVEC= 14 ‘BREAKPOINT TRAP (BPT) 

IOTVEC= 20 td Ne yt TRAP (IOT) **SCOPE** 
PWRVEC= 24 : POWER FAIL 

EMTVEC= 30 EMULATOR TRAP (EMT) **ERROR** 
TRAPVE C=34 32° 'TRAP'' TRAP 

TKVEC= 60 SITTY KEYBOARD VECTOR 

TPVEC= 64 3: TTY PRINTER VECTOR 


PIRQVEC=240 
-SBTTL TRAP CATCHER 


3 ;PROGRAM INTERRUPT REQUEST VECTOR 


-=0 
;*ALL UNUSED LOCATIONS FROM 4 = 776 CONTAIN A ‘'.+2,HALT"’ 
;*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
Reaataictoge Fi CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 


DISPREG: “WORD 0 3s SOFTWARE DISPLAY REGISTER 
SWREG: WORD 0 3 ¢SOFTWARE SWITCH REGISTER 
-SBTTL STARTING ADDRESS(ES) 

JMP @ASTART ;;JUMP TO STARTING ADDRESS OF PROGRAM 
-=700 ;PUT APT HEADER IN STACK AREA 
.SBTTL APT PARAMETER BLOCK 


LEAR REE ERERERERERE ERE ARERR RRRERERAE RAE EA EERE ERERA EEE ED 


;SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
ZBI IIIIISINIIIIUIOIIIOIIISIDIOIDIOIOIOIOIOIIOIUIDIUIDUIIUIDIIUIOIIOIIIIDO OSI ints 
. $X=. 32SAVE CURRENT LOCATION 
.=24 7;SET POWER FAIL TO POINT TO START OF PROGRAM 
200 7 sFOR APT START UP 
-=44 POINT TO APT INDIRECT ADDRESS PNTR. 
SAPTHDR POINT TO APT HEADER BLOCK 
=. $X ;2RESET LOCATION COUNTER 
PETITITTICCLITI TILT C TTT TTT TTT TTT TILL TTTTiTitiTiii Lite ieeeil, 
;SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
; INTERFACE SPEC. 


$APTHD: 

$HIBTS: .WORD 0 7:TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

SMBADR: .WORD SMAIL ; ADDRESS OF APT MAILBOX (BITS 0-15) 

$TSTM: WORD + TIM OF LONGEST TEST 

$SPASTM: .WORD i TIME IN SECS. OF 1ST PASS ON 7 UNIT (QUICK VERIFY) 
SUNITM: WORD DITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 


-WORD $ETEND- snl? 7 LENGTH MAILBOX~E TABLE (WORDS) 
.SBTTL ACT11 HOOKS 


VERA RASESAASAAZASLALRA SESE SRR RRR RRR RRR RE RRR RRR RRR RRR RRR RRR RRR R RR ERE 
“HOOK S REQUIRED BY ACT11 
$SVPC=. ;SAVE PC 


-WORD 0 322)SET LOC.52 TO ZERO 
-=$SVPC 32 RESTORE PC 


6 
— 331)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 


CA Se SOG RRR UI a Ne Hon 
STS MACY! ya bieateas 17=SEP=79 09:55 PAGE 18 | 
AGS SEQ 0017 


936 SS AAAAAARAAARAAERARARARAARARAAAAAARAAERARRERHAKARKRARRAKRERRERRERAEeee 





COKDAE KD1i=K wees LOGIC TE 
CQKDAE .P11 7=SEP=79 09:47 COMMON T 
aH .SBTTL COMMON TAGS 
B83 LL RARER RETR REE R ERR ERE EEE ERR RE Re 
BBS ;*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
oat ;*USED IN THE PROGRAM. 
887 001000 -=1000 
888 001000 SCMTAG: 3¢START OF COMMON TAGS 
889 001000 «WORD 0 
890 001002 000 $TSTNM: .BYTE 0 ; CONTAINS THE TEST NUMBER 
891 001003 000 SERFLG: .BYTE 0 «CONTAINS ERROR FLAG 
892 001004 $SICNT: .WORD QO ::CONTAINS SUBTEST ITERATION COUNT 
893 001006 $LPADR: .WORD OQ 3:CONTAINS SCOPE LOOP ADDRESS 
894 001010 000000 $LPERR: .WORD 0 ;:CONTAINS SCOPE RETURN FOR ERRORS 
895 001012 000000 SERTTL WORD 0 ;; CONTAINS TOTAL ERRORS DETECTED 
896 001014 000 SITEMB: .BYTE 0 3:CONTAINS ITEM CONTROL BYTE 
897 001015 001 SERMAX: .BYTE 1 7: CONTAINS MAX. ERRORS PER TEST 
898 091016 000000 SERRPC WORD 0 ;: CONTAINS PC OF LAST ERROR INSTRUCTION 
899 001020 $GDADR: .WORD 0 3:CONTAINS ADDRESS OF ‘GOOD' DATA 
900 001022 SBDADR: .WORD 0 7: CONTAINS ADDRESS OF ‘BAD' DATA 
901 001024 0C0000 $GDDAT WORD 0 ::CONTAINS ‘GOOD’ DATA 
902 001026 900000 $BDDAT WORD 0 3: CONTAINS "BAD" DATA 
903 001030 000000 WORD 0 7 ;RESERVED--NOT TO BE USED ' 
904 001032 000000 «WORD OQ 
905 001034 000 $AUTOB: .BYTE 0 ; AUTOMATIC MODE INDICATOR 
906 001035 000 SINTAG: .BYTE 0 32 INTERRUPT MODE INDICATOR 
907 001036 000000 «WORD 0 
908 001040 177570 SwR: . WORD DSwWR 7 ADDRESS OF SWITCH REGISTER 
909 001042 177570 DISPLAY WORD DDISP ; ADDRESS OF DISPLAY REGISTER 
910 001044 177560 $TK 1 0 TiTTY KBD STATUS 
911 001046 177562 $TKB: 177562 7: TTY KBD BUFFER 
912 001050 177564 $TPS: 177564 iz TTY PRINTER STATUS REG. ADDRESS 
913 001052 177566 $TPB: 177566 i: TTY PRINTER BUFFER REG. ADDRESS 
914 001054 000 Liz: OVTE 0 3: CONTAINS NULL CHARACTER FOR FILLS 
915 001055 002 $FILLS: .BYTE 2 7: CONTAINS # OF FILLER CHARACTERS REQUIRED 
916 001056 012 $FILLC: .BYTE 12 sé INSERT FILL CHARS. AFTER A ‘LINE FEED’ 
917 001057 000 $TPFLG: .BYTE 0 32° ‘TERMINAL AVAILABLE'’ akon (BIT<07>=0=YES) 
918 $REGAD: .WORD 0 :: CONTAINS THE ADDRESS FROM 
919 :7WHICH ($REGO) WAS OBTAINED 
920 001062 000000 $REGO: WORD 0 ;: CONTAINS (($REGAD) +0) 
921 001064 000000 $REG1: WORD 0 >: CONTAINS ( ($REGAD) +2) 
922 000000 $REG2: .WORD 0 : CONTAINS (($REGAD) +4) 
923 001070 000000 $REG3: .WORD 0 7: CONTAINS (($REGAD) +6) 
924 001072 000000 $REG4: WORD 0 7: CONTAINS (($REGAD) +10) 
925 001074 000000 $REGS: WORD 0 : CONTAINS (($REGAD) +12) 
926 001076 000000 STMPO: WORD 0 >IUSER DEF INED 
27 001100 000000 STMP1: WORD 0 ;USER DEFINED 
928 0011 000000 $TMP2: WORD 0 USER DEFINED 
929 001104 000000 STMP3: WORD 0 7;USER DEFINED 
930 001106 000000 STMP4: D «OO i: USER DEFINED 
931 001110 000000 STIMES: OQ ; «MAX. R OF ITERATIONS 
932 001112 000000 SESCAPE :0 ESCAPE ON i, ADDRESS 
933 001114 077 $QUES: .ASCII /?/ ;QUESTION MAR 
934 001115 015 $CRLF: .ASCII <15> > CARRIAGE RETURN 
935 001116 000012 $LF: eASCIZ <12> CINE FEED 
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SEQ 0018 


APT MAILBOX=E TABLE 
-SBTTL APT MAILBOX-E TABLE 


SSRI ARRAAAARARRAERRAKEAERAAEKERAERRERRERRERAAHERERHEHEREREEEAOHS 


$MAIL: : APT MAILBOX 
SMSGTY: .WORD AMSGTY ::MESSAGE TYPE CODE 
SFATAL: .WORD AFATAL ;; FATAL ERROR NUMBER 


: , sy 0 
$MSGAD: .WORD AMSGAD ;;MESSAGE ADDRESS 
$SMSGLG: .WORD AMSGLG ;;MESSAGE LENGTH 
SETABLE: ;:APT ENVIRONMENT TABLE 
SENV: -BYTE  AENV ; ENVIRONMENT BYTE 
SENVM: .BYTE  AENVM  ;; ENVIRONMENT MODE BITS 
$SSWREG: .WORD ASWREG ;;APT SWITCH REGISTER 
$USWR: .WORD AUSWR = ;;USER SWITCHES 
$CPUOP : -WORD ACPUOP ;;CPU TYPE,OPTIONS 


E 
11/04=01,11/05=02,11/20=03,71/40=04,11/45=05 


;* ia tae cae 

;* BIT 10=REAL TIME CLOCK 

:* BIT 9=FLOATING POINT a icaaen 
.* BIT 8=MEMORY MANAGEMEN 

$E TEND 

oMEXIT 








CQKDA=f 
CQKDAE . 


KD11<k 
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1 
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ERROR POINTER TABLE 


.SBTTL ERROR POINTER TABLE 
3*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 


3*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 
s*LCCATION $ITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT. 


> *NOTE1: IF SITEMB IS O THE ONLY PERTINEN! DATA IS ($ERRPC). 
*NOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 
;* EM ;zPOINTS TO THE ERROR MESSAGF 
5a DH szPOINTS TO THE DATA HEADER 
;* DT :iPOINTS TO THE DATA 
* DF ;ZPOINTS TO THE DATA FORMAT 
SERRTR: 
2iTER 1 
EM] *S/8 DST WAS DST DEST (IR) TEST (PC) (SP) (PSwW) 
." ;$REGS, $REG3, $REG2, $REG1,$REGO,$ERRPC,$REGS,.S$REG6 
ZS ITEM 2 
:S/B DST WAS DS! ie (IR) TEST (PC) (SP) (PSW) 
H ; 
* :$REG4, $REG3, S$REG2. SREG1, $REGO,SERRPC,$REGS, $REG6 
Z ITEM 3 
ge 3S/B SP WAS SP (IR) TEST (PC) (PSW) 
DT3 :$REG4, $REG3, $REG1,$REGO,$ERRPC,SREG6 
sITEM G 
a :S/B DST WAS DST i as (IR) TEST (PC) (SP) (PSW) 
DH is S 
2 7$REGS, SREG3, SREG2, SREG1, SREGO, SERRPC, SREGS, SREG6 
LITEM 5 
EMS (JR) TEST (PC) (SP) (PSw) 


0 
DTS ;$REG1, SREGO, SERRPC, $REGS, SREG6 


7 ITEM 6 
EM6 » DEST CIR) TEST (PC) (SP) (PSD 


0 
DT6 :$REG2, $REG1, SREGO, SERRPC, S$REGS, $REG6 


SITEM 7 
—M7 sWAS DST DEST (IR) TEST (PC) (SP) (PSw) 


U 
DT? $REG3, SREG2, $REGI, SREGO, SERRPC, S$REGS, $REG6 


ve :S/B RES WAS RES DST OP STC OP TEST (PC) (SP) (PSwW) 
Brio S$REG4, SREG3, SREG2, SREGT, SREGO, SERRPC, SREGS, SREGE 


CQKDA-E KD11-K 
CQKDAE .P11 


BAS! 
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va 
~~ 
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ERRCR POJNTER TABLE SEQ 0020 
s ITEM 11 
—M11 sTESTS SKIPPED 
DH11 > PC EXPCTD ACTUAL (TEST #'S) 
a *$ERRPC, STESTN, $REGO 
s ITEM 12 
EM12 :MED DID NOT ABORT IN USER MODE 
DH23 PC 
DT23 : SERRPC 
0 
s ITEM 13 
EM13 = MED EXECUTED IN USER MODE 
DH23 PC 
DT23 * SERRPC 
0 
ITEM 14 
EM14 sMED CHANGED PSW 
DH23 :PC 
DT23 > SERRPC 
0 
Z ITEM 15 
EM15 sMICROBREAK TRAP=T0-4 DID NOT OCCUR 
DH15 ;ERRPC MEDCODE MICROBK REG. 
DT15 *$ERRPC, STMPO,$TMO1,0 
DF15 0,0 
ITEM 16 


EM16 CACHE DATA LOGGED INCORRECTLY 
DH44 :PC _EXPCT RECVD 
ere ; SERRPC ,$REG1, $REGO,0 


71TEM 17 
EM45 CACHE TAG i WRONG 
DH44 SPC EXP 


CT REC 
gies i SERRPC ,$REGO, SREGI, 0 


: ITEM 20 


EM26 PHYS. BA LOGGED WRONG 
DH44 sPC _EXPCT RECVD 
ze 7 SERRPC ,$REG1,$REGO,0 


7 ITEM 21 

EM21 CSP CONSTANT WRONG 

DH17 *PC MEDCODE EXPECTD RECEIvD 
DT21 :SERRPC,$TMP1,$7TMP2,$REG0,0 
DF 17 7C,0,0 





i 
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CQKDAE. 17=SEP=79 09:47 ERROR FO!INTER TABLE SEQ 0021 
1076 
1077 s ITEM 22 
1078 001360 065563 EM22 ;BAD DATA READ BY A MED 
1079 001362 067341 DH17 sPC MEDCODE EXPECTD RECEIVD 
1080 001364 067656 DT22 sSERRPC,$TMP1,$TMP2,$TMPS,0 
1081 001366 067764 DF 17 30.0.0 
1082 
1083 ITEM 23 
1084 001370 065612 M23 :NO ODD PC TRAP 
1085 001372 067376 DH23 sPC 
1086 001374 067670 D123 > SERRPC 
1087 001376 000000 
1088 
a ITEM 24 
1091 001400 065631 EM24 :ODD ADR. BIT NOT SET IN CPU ERROR REGISTER OR LOG JAM 
1092 001402 067403 DH24 zPC CPUERR LOGJAM 
1093 001404 067674 DT24 ;SERRPC,$REG1, $REGO 
1094 001406 000000 0 
1095 
‘oer SITEM 25 
1098 001410 065514 EM17 ;LOG CUA LOGGED INCORRECT U=ADDR 
1099 001412 067612 DHSS PC EXPCTD RECVD 
1100 001414 067674 DT24 sSERRPC $REG1 $REGO 
1101 001416 900000 0 
1102 
ie, s ITEM 26 
1105 001420 065710 EM26 sPHYS. BA LOGGED WRONG 
1106 001422 067442 DH26 =PC PA<17:16>-EXPCT=PA<15:0> PA<17:16>=RECVD-PA<15:0> 
1107 001424 067712 DT26 sSERRPC ,$REG1,$REG2,$REGO,$REG3,0 
1108 001426 000000 0 
1109 
iy Z1TEM 27 
1112 001430 065735 EM27 ; CACHE PARITY ERROR LOGGED IN BACK UP MODE 
1113 001432 067524 DH27 zPC LOGPBA LOGDATA LOGTAG 
1114 001434 067726 DT27 7 SERRPC,$REG3.$REG1,$REG2 
tag 001436 000000 0 
itis s ITEM 30 
1119 001440 066005 EM30 ; CACHE PARITY TRAPPED WHEN DISABLED 
1120 001442 067376 DH23 =PC 
1121 001444 067670 DI23 sSERRPC 
1122 001446 000000 0 
1123 
11g ITEM 31 
1126 001450 066610 EM31 ZNO CACHE PARITY TRAP 
1127 9001452 067376 DH23 :PC 
1128 001454 067670 DT23 : SERRPC 
1129 001456 000000 0 
1130 
1137 sITTEM 32 


CQKDA-E KD11-K BAS! 
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1132 
1133 


; 
' 
1 
: 
: 
: 
; 
; 
: 
: 
: 
1 
1 
1 
; 
: 
: 
: 
; 
' 
: 
: 
: 
: 
: 
: 
: 
: 
1 
! 
; 
1 
; 
; 
: 
: 
: 
i 
: 
1 
1 
: 
: 
: 
1 
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ERROR POINTER TABLE 


EM32 
DH32 
DT25 
0 


33 


34 


35 


36 


37 


40 


41 


42 


sMEMORY ERROR REGISTERS INCORRECT 
:PC_MEMERR 
; SERRPC ,$REGO 


;TIMEOUT BIT NOT SET IN CPU ERROR REGISTER OR LOG JAM 
3PC_ CPUERR LOGJAM 
7 SERRPC,$REG?, $REGO 


:NO ILLEGAL INTERNAL ADDRESS TRAP 
‘SERRPC 


; INTERNAL ADDRESS FRROR BIT NOT SET IN CPU ERROR REGISTER OR LOG JAM 
:PC CPUERR LOGJAM 
7 SERRPC ,$REG1,$REGO 


ZLAST INTERRUPT/TRAP VECTOR NOT LOGGED IN FLAG REGISTER 
zPC FLGREG 
7 SERRPC,$REGO 


;LOG FIRST MODE DID NOT INHIBIT ERROR LOG AFTER FIRST ERROR 
;PC CPUERR LOGJAM 
; SERRPC ,$REG1. $REGO 


ERROR LOG WAS NOT RE-ENABLED, ODD ADR BIT CLR IN CPUERR 
:PC CPUERR LOGJAM 
7 SERRPC ,$REG1, $REGO 


; INSTRUCTION NOT ABORTED IN CACHE ABORT MODE 
*$ERRPC 


SEQ 0022 


COQKDA=E_KD11=K BASIC L 
CQKDAE.P11 =: 17=SEP=75 
1188 
1189 001560 35 
1190 001562 067573 
1191 001564 0677 
1192 001566 000000 
1193 
1194 
1195 
1196 001570 066723 
1197 001572 067557 
1198 001574 067704 
1199 001576 000000 
1200 
1201 
1202 
1203 001600 067070 
1204 001602 067225 
1205 001604 067740 
1206 001606 000000 
1207 
1208 
1209 
1210 001610 067121 
1211 001612 067225 
1212 001614 067740 
1213 001616 000000 
1214 
1215 
1216 
1217 001620 067147 
1218 001622 067266 
1219 001624 067752 
1220 001626 000000 
1222 076500 
1223 140000 
1224 177770 
1225 177744 
1226 177766 
1227 177746 
1228 100 
1229 1 
1230 000200 
1231 000100 
1232 000200 
1233 
1234 
1235 
1236 
1237 
1238 
1239 
1240 000226 
1241 000022 
1242 000222 
1243 000144 


K 2 
MACY11 30A(1052) 17=SEP=79 09:55 PAGE 24 
ERROR POINTER TABLE 


EM42 ;LO BYTE & TAG PARITY BITS NOT SET IN LOG SERVICE 
DH42 :PC_LOGSERVCE 
Se 'SERRPC. $REGO, 0 


ITEM 43 
EM43 :LO Seen : TAG PARITY BITS NOT SET IN MEM ERR REGISTER 


DH32 :PC MEME 
a= *$ERRPC, SREGO 


ZITEM 44 
EMEIS1 ;EIS SET COND CODES WRONG 
DHEIS1 ; PSwW REG-WAS-REG+1 REG-S/B=REG*+1 PC TEST (IR) 
Tet = $REGAD $REG2 $REG3 $REG1 $REG4 SERRPC $REGO $TMPO 
s ITEM 45 
EME IS2 zEIS GAVE WRONG RESULT 
DHEIS1 PSW REG-WAS-REG+1 REG-S/B=-REG+1 PC TEST (IR) 
Nope  $REGAD $REG2 $REG3 $REG1 $REGS $SERRPC $REGO $TMPO 
ZITEM 46 
EM46 ‘tr? Somers > eel (DECREMENT) DID NOT OCCUR 
DH46 PC (IR TEST 
es  $ERRPC stHrO $REGO 

MED = 076600 

UM= 140000 


MEMERR=177744 
CPUERR=177766 
CCR=177746 
WWwP=B1T6 
DPTRP=BITO 
PABORT=B1T7 
TAG=B1T5 


-EQUIV SP,KSP 


3* MED OPERATION CODE DEFINITIONS 
WCNSSW=226 


RDFLAG=144 


SEQ 0023 
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CQKDA=E KD11-K BASIC LOGIC 
CQKDAE .P11 17=SEP=79 09:47 ERROR POINTER TABLE SEQ 0024 
1244 000344 WRF LAG=344 
1245 000100 RDL JAM=100 
1246 000300 WRL JAM=300 
1247 000101 RDLSERVICE=101 
1248 000301 WRL SERVI CE=301 
1249 000102 RDLPBA=102 
1250 000302 WRLPBA=302 
1251 000103 RDLCUA=103 
1252 000303 WRL CUA=303 
1253 000104 RDLFGINT=104 
1254 000304 WRLF GINT=304 
1255 000105 RDLWHAM] =105 
1256 000305 WRL WHAM] =305 
1257 000106 RDLDATA=106 
1258 000306 WRLDATA=306 
1259 000107 RDL TAG=107 
1260 000307 wRL TAG=307 
1<0) 000071 SWB01=71 sMICRO ADDR. IN SWAB INST. 
1263 
1264 
ord ADDRESS ASSIGNMENTS FOR DL11 CONSOLE TERMINAL INTERFACE 
1267 177560 RCSR=177560 zRCVR. CONTROL / STATUS REG. — 
1268 177562 RDBR = 177562 ;RECEIVER DATA BUFFER REG. ADDR 
1269 177564 XCSR = 177564 ; TRANSMITTER CONTROL / STATUS REG. ADDR 
1270 177566 XDBR = 177566 : TRANSMIT DATA BUFFER REG. ADDR 
1271 177546 LKCSR= 177546 LINE CLOCK ADDRESS 
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CQKDA-E KD11-K BASIC LOGIC TE 
CQKDAE .P11 17=SEP=79 09:47 ERROR POINTER TABLE SEQ 0025 
1273 EC EESAEALALAAASA SAL 
1274 FP AB , 
Lf 1 STIVIIIITIAAIAALL AISA 
is?8 FORO IOIS OID IIOISISISISIOIDIEIUIOIIOISIISISIIOIIDIOIIDIDIUIUIUIDIDIDIDIOIIDIUIOIDIUIDIOIDIDIOISIDIUIUIDIUIDINI IOI . ° 
1278 .SBTTL BT001 ‘'BR*' TEST =POSITIVE OFFSET 
1279 POSES IO OISUISIISIOSIOIIOIIOIIUIDIIIUIIUIOICUIDIIUIDIUIUIIIIIOIUIIIIUIIUDIIOIIIOIIOI IOI itns 
1280 
1281 001630 CHGE1: 
1282 FRO III IOI IR ite 
1283 001630 005067 176142 START: CLR PS ;CLEAR PROCESSOR STATUS WORD 
1284 III ICICI I otek 
‘Sea 001634 000401 BT00i: BR BT002 i TEST THE BR FORWARD 
1Se0 001636 000000 E001: HALT ;BR FAILED TO LOAD PC PROPERLY 
1289 ORISA ISIUISIUISISIUIDIDIOISIOIDIOIIOIDISIIOIUIOIUIOIOIUIOIOIOIOITIDIUIOOIIOISIDISIOIDISIOISI IOI IOICIOI IOI IDI 
1290 .SBTTL BTOO2 'BR'' TEST = NEGATIVE OFFSET 
1291 OOOO ICIS IIISISISISIISIOIUIOIDIISISIIOIOIUIOIUIOISIIOIOI IDIOT OI ITO OTR TIITIIII 
1292 
i 001640 000402 BTO02: BR 1002 3;GO TO TEST INSTRUCTION 
34] 001642 000403 A002: BR BT003 ;GO TO NEXT TEST 
344 001644 000000 EX002: HALT ;JUST IN CASE 
Ht44 001646 000775 1002: BR A002 ;TEST THE BR — NEG. OFFSET 
Hf 4 001650 000000 E2002: HALT ;BR FAILED WITH NEG. OFFSET 
1303 FOROS UIOISISIOIISISIOIDISIOIDIOIUIOIDISIIIOIDIOIOIOIDIDIIOIOIOIUIOIOIOIUIOIDIIDIOIOIOISI IDIOT IIS IOI TIIOIDI IE 
1304 .SBITL BTOO3 ‘BASIC COND. BR'' TEST = FLAGS CLEARED 
1305 OARS IOISIIIUIDIOIIOIUISIUIDIDIOIUIOIDIUIOIDIDIUIOIDIOIIOIDIUIOIOIDII IOI IOI IOISIDIDIDI INI IGE 
1306 - . 
1307 001652 100403 BT003: BMI E003 BR IF ‘WN’ SET 
1308 001654 001402 BEQ E003 ;BR IF°*'2** SET 
1309 001656 102401 BVS E003 BR IF a SET 
Hf ds 001660 103002 BCC BT004 JBR IF “'C’’ CLEAR 
1312 001662 000000 E003: HALT ZERROR - ONE OF THE ABOVE BR'S FAILED 
1313 A THE FLAGS FAILED TO CLEAR ON ‘‘START’’ 
13i¢ 001664 000772 BR BT003 OCk: ¥0N HARD ERROR 
1316 DORR IIUIISOIIOIUIUIISIUIOIIIIOUIOOUIOUIIOIUIUIIIUIUIOODIOIOUIOD Orn it itrnnrtt 
1317 .-SBTTL BT004 ‘’SCC AND COND. 4. TEST *- FLAGS SET 
1318 Petit iiiittittitisiiiiet ii iat ici i i sr enesnngeinenencapnenennannen ane 
1319 
13s 001666 000277 BT004: SCC sMAKE N:C=1111 
1322 001670 100003 1004: BPL E004 BR If °N’' FAILED TO SET 
1323 001672 001002 BNE E004 ;BR IF ‘'27'' FAILED TO SET 
1324 001674 102001 BYC E004 ;BR IF ‘V'* FAILED TO SET 
4 001676 103402 BCS BT005 BR IF T OK 
1327 001700 000000 F004: HALT 4 ay ONE OF THE ABOVE BRS FAILED 
1328 sOR THA SCC FAILED TO SET ALL THE FLAGS 
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CQKDA=E KD11-K BASIC LOGIC TE 
CQKDAE .P11 17=SEP=79 09:47 BTO04 *’SCC AND COND. BR'S'' TEST = FLAGS SET SEQ 0026 
138 001702 000771 BR BT004 ;LOCK ON HARD ERROR 
1331 DOES IIIIIIIDUU RTE RETR EEE EERE EEE E ERR EERE 
1332 -SBTTL BTOOS ‘CCC AND COND. BR'S'’ TEST = FLAGS CLEARED 
1332 J RRR RRR EEE REE E REE E EERE EERE REE REE ERE 
1334 


CQKDA-E KD11-K BASIC LOGIC TESTS 


CQKDAE . 79 09:47 


1335 


Ww 
Ww 
N 


WW 
SB 


MO OWNAUSWH—-O”O 


AOGAR EERE LER RRA 


Ww 
MANY 
W 


eT 
WWWNWWWWNW 
UW 
NOUS 


— 44 SS 
RRA 
—O0o 


SSSSEES 


WSN 
WN=CO 


ES S$ Sot eat SP 


~~ 2S So St ot SS 2 os oS os oo St SS 
& SSS 
» NONE 


g 


P11 


001704 


17=SEP= 


MACY11 30A(1052) 
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17=SEP=79 09:55 PAGE 28 


BTOOS ‘'CCC AND COND. 


BTOOS: 


1005: 


E00S: 


BT005 


BR'S 


S'' TEST = FLAGS CLEARED 
;MAKE N:C=0000 


BR IF 'N'' STILL SET 
:BR IF ''7'' STILL SET 


BR IF ‘V'' STILL SET 


BR IF "'C'' GOT CLEARED 


;ERROR = ONE OF THE ABOVE BR'S FAILED 
;OR THE CCC FAILED TO CLEAR ALL FLAGS 
;LOCK ON HARD ERROR 


5 LAS RRRRRARARASASASASASARARARARSSASASARERA RARER ERAS SAR ERAS ARR SERA S SES SS 


-SBTTL BT006 ‘CLR &R"' 


TEST = SETS THE ‘2°’ BIT 


5 LAO eee eee R RRR RR ERR RR RRR RE RRR RRR RRR R RRS E RRR RRR RRR ARERR RRR RRS RES DO 


BT006: 


1006: 


E006: 


CCC 
CLR 
BEQ 


HAL T 
BR 


RO 
BT007 


BT006 


sMAKE N:C=0000 
; TEST THE CLR - IT SHOULD SET ‘'7"' 
:BR IF CLR SET ‘7'' 


ERROR - CLR FAILED TO SET *'2"' 
;LOCK ON HARD ERROR 


g A222 RRR RRRRRSRSRSESRASRRRRRSRSSAS ARERR SRR ES AAS ASA SERRE SRSA SAREE ESS 


-SBTTL BTOO7 ‘TST %R"" 


TEST = USING THE CLR 


: LARS S SERRE RSSSAARSASASARRRESRERRRRS ESR AS ALAS RRR R RRR RS RRS RRA RRR RS EE SO 


BT007: 


1007: 


E007: 


CLR 
CCC 


TST 
BEQ 
HALT 
BR 


RO 


RO 
BT010 


BT007 


;MAKE ae Pe 
sMAKE N 


TEST THE TST = IT SHOULD SET ‘'2"' 
;BR IF ''2'' SET OK 
;ERROR - CLR FAILED TO LOAD RO WITH 


‘ALL ZEROES OR TST FAILED 
‘LOCK ON HARD ERROR 


a 
=0000 


SERRE REE AEEEEREEEKEEEREKE KERR AREE ERE ERERKEERRREAEAEERE RARER EE 


-SBTTL BTO10 ‘COM %R*' TEST = SHOULD SET ‘N’’ AND ‘'C"’ 


3 LAR RR SARSRREASSRESALELERRSASARER SESE SERA E ERE R RRR RRR RRR SRR RR RRR RSS EDS 


BT010: 


1010: 


E010: 


CLR 
ccc 


COM 


BPL 
BCS 


HALT 
BR 


RO 
RO 
E010 
BT011 


BT010 


MAKE CROJ] = 000600 


MAKE N: C=0000 
TEST THE COM - CRO) S/B = 


BR IF ‘N’' FAILED TO SET 
:BR IF ‘'C'' SET OK 


ERROR - COM FAILED 
;LOCK ON HARD ERROR 


177777 


» LASSE RAS ESSERE R AR RRR RRR RR RRR RRR RRR RRR RRR RRR RRR RR RRR RR RRR RRR REE EDD | 


.SBTTL BTO11 "COM %R AND ADC 


ZR" TEST 


3 
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CQKDAE .P11 7-SEP=79 09:47 BTO11 ‘'COM %R AND ADC &R'' T SEQ 0028 
1391 LRA ER EERE ERE EEE EERE EEE EERE TERRE RETR ER et 
1392 
1393 001766 005000 BT011: CLR RO ;MAKE CROJ = 000000 
if a 001770 000257 CCC SMAKE N: C=0000 
1396 001772 005100 1011: COM RO TEST THE COM = CRO] S/B = 177777 
if ad 001774 005500 ADC RO ; TEST THE ADC = CRO] S/B = 000000 
1399 001776 001001 BNE E011 ;BR IF ''2'' DID NOT SET 
Apr 002000 103402 BCS BT012 ,BR IF ''C'’ SET Ok 
1402 002002 000000 E011: HALT ;ERROR - COM OR ADC FAILED 
oar 002004 000770 BR BT011 ;LOCK ON HARD ERROR 
1ane CD OSIOIIISUIIIUIIIOIUIIDIOIOIIIOIOIIOISIOIOIIDIOIOIUIOIDIOIDIOIDIOIUIOIUIOIOIOIUIOIOIUIOIOIDIDIDIDIDIDIDIDIDIDIDIDIUIIOI It 
1406 .SBTTL BT012 ‘MOV 4#N,R'' TEST WITH N=177777,[RJ=000000 
1407 PR RRR ERR ERE REE REE RE RR eee 
1408 
1409 002006 005000 BTOl2: CLR RO sMAKE CROJ = 000000 
cert 002010 000257 CCC MAKE N:C=0000 
nit 002012 012700 177777 1012: MOV #-7 ,RO ; TEST THE MOV - CRO) S/B = 177777 
1414 002016 005100 COM RO MAKE es on 
Ht 002020 001402 BEQ BT013 ;BR IF 
1417 002022 000000 EQl2: HALT ;ERROR - MOV gaits. TO LOAD RO WI1H ALL 1°S 
ree 002024 9000770 BR BT012 ;LOCK ON HARD ER 
1420 DOI IGIIIUIOIIIUIOIIOIIOIIIOIOOIUIDIOIUIUIDIOIOIUIDIUIORIDIOIUIOIIOOIIDIOUIIUOIIUIIOR it tit t 
1421 -SBTTL BT913 "MOV 4#N,R'' TEST WITH N=000000,([RIJ=177777 
1422 DOSS IIUIIOIOIIIDIUIUIOIUUIIDIDIIUOIUIIOD RR Ron Ei ttt ttt 
1423 
1424 002026 005000 BT013: CLR RO sMAKE CROJ = 000000 
1425 002030 005100 COM RO MAKE CROJ = 177777 
<3 002032 000257 CCC : SCOPE SYNC 
Hy 002034 012700 000000 1013: MOV #0,RO ; TEST THE MOV - CRO] S/B = 000000 
1430 002040 005100 COM RO sMAKE [RO] = 177777, SET ‘'C’’ 
1431 002042 005500 ADC RO sxe CROJ = 000000 
Lh 002044 001402 BEQ BT014 BR IF ‘'2'' GOT SET 
1434 002046 000000 E013: HALT ;ERROR - MOV FAILED TO CLEAR RO 
ho 002050 000766 BR BT013 ;LOCK ON HARD ERROR 
1437 PEE EERE ERRATA ERE RARER EERE R EERE R ARR Eee 
1438 .SBTTL BT014 ‘CLR (R)** TEST = CR) = 177776 
1439 LRA EERE REE ERRATA AEA ARATE E RARE RRA 
1440 
1441 002052 012706 001000 BT014: MOV ASTACK,SP ;SET UP STACK POINTER 
1442 002056 012700 177776 MOV #PSwW,RO ;RO POINTS TO PSwW 
1? 002062 060277 scc ;MAKE [PSW] = 017 
1445 002064 005010 1014: CLR (RO) STEST THE CLR = JT SHOULD CLEAR PSwW 


3 
CQKDA=E KD11=-K BASIC LOGIC TESTS MACY11 30A(1052) 17=sEP=79 a7! $3 PAGE 30 , 
CQKDAE .P11 17=SEP=79 09:47 BTO14 “CLR (R)*' TEST = (RJ = 776 SEQ 0029 | 
ach 002066 007002 BNE BT015 ;BR IF CLR MADE ''2'' = 0 = IT SHOULD 
1449 002070 000000 F014: HALT ;ERROR= CLR FAILED TO CLEAR PSw 
cat 002072 000767 BR BT014 ;LOCK ON HARD ERROR 
1452 EERE RARER EEE EERE ERE EERE EERE EERE EER ee 
1453 -SBTTL BT015 "CLR (R)*4'’ TEST = LR] = 177776 
1454 PARE REE ERE EEE EE RRR ee 
1455 
1456 002074 012700 177776 BT015: MOV #PSW,RO :RO POINTS TO PSw 
py 24 002100 000277 SCC sMAKE CPSW] = 017 
e+ 4 002102 005020 1015: CLR (RO) + sTEST THE CLR - IT SHOULD CLEAR PSw 
1an3 002104 001002: BNE A015 ;BR IF CLR MADE ‘'7'' = 0 = IT SHOULD 
1463 002106 000000 £1015A: HALT ;ERROR= CLR FAILED TO CLEAR PSwW 
ions 002110 000771 BR BT015 ;LOCK ON HARD ERROR 
Mr 002112 005700 AOS: TST RO ;AUTO INC SHOULD ZERO RO 
002114 001402 BEQ BT016 ;BR IF IT DID 
1470 002116 000000 £2015: HALT sERROR - AUTOINC. FAILED 
pg 002120 000765 BR BT015 ;LOCK ON HARD ERROR 
1473 DRE RE REE REE REE ERR EERE ERR RR te 
1474 .SBTTL BTO16 "COM (R)** TEST = CR) = 177776 
1475 LEAR RAE EERE EERE EERE REE E EERE EERE EERE EER 
1476 
1477 002122 012700 177776 BT016: MOV #PSwW,RO ;RO POINTS TO PSW 
eg | 002126 000257 CCC :MAKE CPSW) = 000 
ait 002130 005110 19016: COM (RO) i; TEST THE COM = [PSW2 S/B = 357 
1482 002132 100603 BPi. E016 3N:C=1111 ? 
1483 002134 001002 BNE E016 
1484 002136 102001 BVC E016 
ven 54 002140 103403 BCS BT017 
1487 002142 005010 E016: CLR (RO) ;GO TO KERNEL MODE 
1488 002144 000000 HAL T SER ROR - COM FAILED TO MAKE [PSwW] = 357 
pe 44 002146 000765 BR BT016 ;LOCK ON HARD ERROR 
1491 LRA REE EEE REAR RE RERERERE ERE RER RE ERR EER EERE 
1492 .SBTTL BTO17 ‘'COM (RO)+"' TEST = CROJ = 177776 
1493 J RARER AREER ERE RARER EERE RARER AREER REE AERA R ERT 
1494 
1495 002150 012700 177776 BT017: MOV #PSW,RO 7RO POINTS TO PSW 
1496 002154 005010 CLR (RO) SMAKE CPSW] = 000 
ioe 002156 000257 ccc i; SCOPE SYNC 
ys 002160 005120 1017: COM (RQ) + TEST THE COM - CPSW) S/B = 357 
1501 002162 100003 BPL EAQ17 sNsC = 1117 ? 


1502 002164 001002 BNE FAQ17 
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CQKDAE .P11 17=SEP=79 09:47 BT017 "‘COM (RO)+*' TEST = [RO] = 177776 SEQ 0030 
1503 002166 102001 BVC EAQ17 
‘ope 002170 103405 Brs A017 
1806 002172 012701 177776 EAQ17: MOV #PSw,R1 
1507 002176 005011 CLR (R1) 
1508 002200 000000 HALT 7COM FAILED TO SET ALL FLAGS 
1640 002202 000762 BR BT017 ;LOCK ON HARD ERROR 
1511 002204 005100 AOD1?7?: COM RO ; SHOULD MAKE CROJ = 177777 
1512 002206 0C5500 ADC RO ; SHOULD MAKE [RO] = 000000 
lei7 002210 001405 BEQ BT020 
1515 002212 012701 177776 E2017: MOV #PSW,R1 
1516 002216 005011 CLR (R1) 
1517 002220 000000 HALT ;ERROR = COM FAILED TO AUTO INC. RO 
He 002222 000752 BR BT017 ;LOCK ON HARD ERROR 
1520 RRR RTI TTD RR TT RRR REE RETR ERE EERE ERE EER RE 
1521 .SBITL BT020 ‘MOV RA,RB'' TEST - WITH [RAJ=177777,(RBJ=000000 | 
1522 Py (AR RSBRRARRSRARRRRAR RRR RR RRR SRR RRR RRR RR RRR RRR RRR RRR RS RRR RRR RRS RRR RES 
1523 
15246 002224 012700 177776 BT020: MOV #PSW,RO 
1525 002230 005010 CLR (RO) 
1526 002232 005000 CLR RO :MAKE CROJ=000000 
1527 002234 005001 CLR R1 :MAKE (CR1J=000000 
1528 002236 005101 COM R1 sMAKE (R1)=0207777 
1a. 002240 000257 Cle :SCOPE SYNC 
13 002242 010100 1020: MOV R1,R0 ;TEST THE MOV i 
\2ez 002244 100402 BMI A020 ;BR IF 'N’' GOT SET | 
1535 002246 000000 EA020: HALT ;ERROR-MOV FAILED TO SET ‘N'' 
1238 002250 000765 BR BT020 ;LOCK ON HARD ERROR 
1538 002252 005100 A020: COM RO :CROJ SHOULD GO TO 000000 
tS 94 002254 0601402 BEQ BI021 ;BR IF IT DID 
1541 002256 000000 E2020: HALT ZERROR-MOV FAILED TO LOAD RO WITH 1°S 
Pg 002260 000761 BR BT020 ;LOCK ON HARD ERROR | 
1544 LR EERE ERE REE RARER REE ER ER ERR EEE ERE AER EE 
1545 .SBTTL BTO21 'MOv RA,RB TEST WITH CRAJ=000000,[RBIJ=177777 
1546 s (ROR RRRESASRAR ARERR RRR RRR RRS RRR SRR RRR RR RR RRR RRR RRR RRR RRR RRR RRR RRR EEE 
1547 
1548 002262 005000 BTO21: CLR RO MAKE CROJ=000000 
1549 002264 005100 COM RO sMAKE CROJ=177777 
1550 002266 005001 CLR R1 MAKE [R1)=000000 
1551 002270 000257 CCC ;SCOPE SYNC 


MOV TEST THE MOV 

BEQ ;BR IF *'2'' GOT SET 

HAL T sMOV FAILED TC SET ‘'?"" 
BR 


;LOCK ON HARD ERROR 








CQKDA-E -s ba we? 
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002302 
002304 
002306 


002310 
002312 


000257 
012737 


102001 
103402 


000000 
000766 


012700 
012701 
000257 


010120 


000017 


177776 
000017 


177776 


177776 
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BT021 ‘MOV RA,RB'' TEST WITH CRAJ= 000000, C(RBJ=177777 


AQ21: COM RO SHOULD MAKE [CROJ= wh Lhaka4 AND SET ‘'C'* 


ADC RO ; SHOULD | ee — 00000 
BEQ BT022 :BR IF ‘'7"' 

E2021: HALT ;MOV FAILED TO ZERO RO 
BR BT021 ;LOCK ON HARD ERROR 


ps ARR RRRSAASARRRRRARESR RARER RARER RE RRR ARR RRR RR RRR RRR RRR RRR ARERR RR RD DOD 


.SBTTL BTO22 "MOV 4N,@MA'' TEST WITH N=17,A=177776 


Bs TARR RSRSE RASS RAR RRRR ERA RRR RRR RARER RRR RRR R RRR RRR RRR RRR RRR RRR RRR REESE SD 


BTOze< ccc sMAKE [PSWJ=000 
1022: MOV #17, a4PSw s TEST THE MOV 
BPL EQ022 mN:C=1111 
BNE E022 
BVC E022 
BCS BT023 
E022: HALT MOV FAILED TO LOAD PSwW 
BR BT022 ;LOCK ON HARD ERROR 


; (AR RRRRARRSSRARRSRRARRSERRRRR RR RRRRRRRERRR RRR ARERR RRR RRR RRR RRA RRR SDS D SS: 


.SBTTL BT023 ‘MOV RA,(RB)+'' TEST WITH CRAJ=17,(RBI=177776 


Zz (Re SR ARAR ER EERRRRR ARERR RARER RR RRR R RARER RR RRR RRR RRR RRR RR RRR RAR RRR SED OD 


BT023: MOV #PSwW RO sRO POINTS TO PSw 
MOV #17,R1 ; CSQURCEJ=017 
ccc :SCOPE SYNC = MAKE <N:(C> = 0000 
1023: MOV R171, (RO) + : TEST THE MOV 
BPL EA023 suet = TITT ? 
BNE EA023 
BVC EAC23 
BCS A023 
FA023: HALT sMOV FAILED TO LOAD PSwW 
BR BT023 ;LOCK ON HARD ERROR 
A023: TST RO :DID AUTO INC MAKE RO GO TO 0? 
BEQ BT024 ;BR IF IT DID 
E2023: HALT sMOV FAILED TO AUTO INC. RO 
BR BT023 ;LOCK ON HARD ERROR 


Z (ARBRE SRSSRERESER ERS REE RRR RRR RRR RRR SER RRA RARER SERRE RRR ARR RR RRR RRR ARES EE | 


.SBTTL BT024 ''CMP #N,@MA'' TEST WITH N=(A) 


Z [RE RR ERRSSREERER RSE RE RR RR RRRR RRR RRR RRR RR RRR RE R RR RR RRR RRR RRR SARA RA SAS ED. 


BT024: MOV #PSwW,RO :RO POINTS TO PSwW 
CLR (RO) sMAKE [PSWJ=000 
273 sMAKE N:(=1011 


: 


SEQ 0031 
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002410 
002416 


002420 
002422 


002424 
002426 


0024 34 
0024 36 


002440 
002442 


002444 
002446 


002454 
002456 


002460 
002462 


002464 
002470 


002472 
002476 


002500 
002502 


002504 
002510 


002512 
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022737 
001402 


000000 
000766 


000257 
022737 
001401 
000402 


000000 
000770 


000277 
022737 


001401 
000402 


000000 
000770 


012700 
000257 


020027 
061402 


000000 
000770 


012700 
000264 


020027 


00001 3 


000017 


000000 


177777 


177777 


000001 


177777 


177776 


177776 


177776 
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BT024 ‘'CMP #N,@AMA"’ TEST WITH N=(A) 


1024: CMP #13, a4PSw i; TEST THE CMP 
BEQ BT025 ;BR IF ''2'' GOT SET 
F024: HALT CMP FAILED TO SET ‘'7"' 
BR BT024 ;LOCK ON HARD ERROR 


Fy TARR RRRPRRRRASARASARRARRARAR RAR RRR RRRRARSRARRRRR RR RRR RR RRR RRR RR RRR RRS! 


.SBTTL BT025 "CMP AN,@MA'' WITH N > (A) 


é (Ae RRR RRR RRRRRRRRR RARER RRAR RR RRR RR RR RRR RR RRR RRR RRR RRR RRR RRR RRR RRS! 


BT025: CCC MAKE [PSwJ=000 

1025: CMP #17, aAPSw i; TEST THE CMP 
BEQ E025 ;BR IF ‘'2°* GOT SET 
BR BT026 ;GO TO NEXT TEST 

E025: HALT CMP FAILED TO CLEAR ‘'2"' 
BR BT025 ;LOCK ON HARD ERROR 


; (RRR RARE SAASARASASRSARRRSRRSRRRRR SRR RARAR ARR SRRRA RAS RRR RRR RRR RRR REDD DBD 


.SBTTL BT026 ‘CMP #N,@AA'' WITH N < (A) 


Z (ARR RRR RRRRERRRRRRARSESRRARRRSRARR RARER RRR RRR R RRR RRR RRR RRR RRR RR RRS SS OI 


BT026: SCC MAKE CPSWJ=017 

1026: CMP #0, a4PSW ;TEST THE CMP 
BEQ E026 ;BR IF ‘'2"' GOT SET 
BR BT027 ;GO TO NEXT TEST 

F026: HALT ;CMP FAILED TO CLEAR °7"" 
BR BT026 ;LOCK ON HARD ERROR 


hy IRR RRSSAASLERERRSSSALS RE RASAR RRR SESE RSE RR RAR RRR RRR RRR RRR RRR RR RRR RASS SDS 


.SBTTL BT027 *'CMP R,AN’’ TEST WITH CRI=N 


2 LRP RAR ASLSSARRRESASERSRARRASRRERA SARE R ARERR RRR RRR RRR RRR RRR RRR RRR RSE DD 


BT027: MOV #-1,RO MAKE CROJ=177777 


ccc 2N:C=0000 
1027: CMP RO,a-1 TEST THE CMP 

BEQ 87030 ;BR IF CMP SET ‘'7"' 
E027: HALT ;CMP FAILED 

BR BT027 ;LOCK ON HARD ERROR 


fs LAR RRRESSESE SERRE PSR ERE RRR RRR RRR RER RRR RRR RR RR RRR RRR RRR RR SERA RAS ESOS DB 


.SBTTL BT030 ‘CMP R,AN'’ TEST WITH CR] > N 


3 (RRR REPRASERESERRERRSRR ERE RRRRR RE RRR RRR RRR RRR RRR ERR RRR RRR RRR RRR RAR SS EB 


sMAKE C(ROJ= rs 
:SET THE ale oe 


1030: CMP RO, 4-1) :TEST THE CMP 


BT030: MOV #1,R0 
SEZ 
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CQKDA-E A ieee BASIC LOGIC 7E 
CQKDAE .P11 17=SEP=79 09:47 BTO30 "CMP R,AN’’ TEST WITH (R] > N SEQ 0033 
1671 
10r8 902516 001002 BNE B1031 ;BR IF CMP CLEARED ''2"' 
1674 002520 000000 F030: HALT ;CMP FAILED 
1675 002522 000770 BR BT030 ;LOCK ON HARD ERROR 
1676 DORI IDIEOOIIIUIDIOINIIIIOIISIIDIDIDIUIUIOIUIUIOIUIUIDIUIEOIIDIIDIUIIDUIOIUIDI OS ft nth ttt 
1677 .SBTTL BT031 ‘'CMP R,AN’' TEST WITH CRI < N 
1678 DORIS ISOIUIIDIIIIIUIOIIDIIIIOINIIOIIIIERIUIIOIUIIOIOIIOIUIIUIOIIUIDIIUOIUIIUIOIIUINO OO Git tt 
1679 
1680 002524 012700 000001 BTO31: MOV #1,RO sMAKE CRO] = +t 
eH 002530 000264 SEZ sSET THE ‘T'S 
He 002532 020027 000017 1031: CMP RO,417 ; TEST THE CMP 
Hb 002536 001002 BNE BT032 ;BR IF CMP CLEARED ‘'7'* 
1 
1687 002540 000000 E031: HAL T :CMP FAILED TO SET ‘‘72"' 
ich 002542 0600770 BR BT031 ;LOCK ON HARD ERROR 
1690 CORIO IIIS IIIS III IUIUIIUIIIIIOUIIUIIIUIDIIUIO IID IE ttt titt 
1691 -SBTTL BTO032 "CMP (RA)+,RB'' TEST WITH CSOURCEJ=CRB) 
1692 DOOR IOIUIIOIIOIOIUIIIIIIOOIIOIUIOUIOUIOIIOIIDIDIUIDIUIDIDIDIUIUIOIIDIDIDIDIDIOIIOIIDIUIIOIU IS Toft tt 
1693 
1694 002544 012700 177776 BT032: MOV #PSW,RO :RO POINTS TO PSW 
1695 002550 012737 000340 177776 MOV #340, a4PSW sMAKE CPSWJ=340 
1696 002556 012701 000340 MOV #340,R1 MAKE CDESTI=340 
5 od 002562 000257 CCC 3N:C=0000 
0 002564 022001 1032: CMP (RO)+,R1 ;TEST THE CMP 
444 002566 001402 BEQ A032 ;BR IF *'7'' GOT SET 
1703 002570 000000 EAQ32: HALT = CMP FAILED TO wh PSwW 
i 002572 000764 BR BT032 LOCK ON HARD ERR 
1706 002574 005700 A032: TST RO :''7'' SHOULD SET 
~~ 002576 001402 £Q BT033 BR IF ''2'* SET 
1709 002600 000000 £2032: HALT ;CMP FAILED TO AUTO INC. RO 
ay 002602 000760 BR BT032 ;LOCK ON HARD ERROR 
1712 DOI IOUS OUI IIR ORR tk Ek Ee thts 
1713 -SBTTL BT033 "'CMP (RA)+,RB’* TEST WITH CSOURCEJ>(RBI 
1714 DORI IIIIOIIIUIIUIUIUIIIUIIUIOIIUIIUOU IR RE Ee RE thet ttre 
1715 
1716 002604 012700 17777 BT0335: MOV #PSwW,RO ;RO POINTS TO PSwW 
1717 002610 012737 000346 177776 MOV #340, a4PSW sMAKE (CPSWJ=340 
1718 002616 012701 000330 MOV #330,R1 sMAKE (DESTJ=330 
tah 002622 264 SEZ SET THE ‘'2°' BIT 
178) 002624 022001 1033: CMP (RO)+,R1 ;TEST THE CMP 
< 002626 001002 BNE A033 ;BR IF ‘'7"' GOT CLEARED 
1725 002630 000000 FAQ33: HALT ; :(MP FAILED TO ACCESS PSw 
1726 002632 000764 BR B1033 SLOCK ON HARD ERROR 
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BT033 ‘‘CMP (RA)+,RB'' TEST WITH CSOURCEJ>CRBJ 


AQOSS: TST RO 3''7'" SHOULD SET 
BEQ BT034 ;BR IF ''2'' SET 

£2033: HALT ;CMP FAILED TO AUTO INC. RO 
BR BT033 ;LOCK ON HARD ERROR 


Wee Pe eee eee RRR RRR RERR RRR RRRRRERRRERA SERA RRR R RAR ASRS SRR ER RR RRR RSS SSE SD 


; .SBTTL BT034 ‘'CMP (RA)+,R8'' TEST WITH CSOURCEJ<C[RB] 


: LAR RRA RASA RARRRSRSS ARERR ARERAAREAASRRRSRARRRA RR RRR RRR RRR RRR RRR RRR RSE S ED 


BT034: MOV #PSw,RO :RO POINTS TO PSw 
MOV 4330, a4PSW “MAKE [PSWJ=330 
MOV #340,R1 sMAKE (CDESTI=340 
SE2 3SET THE ‘'2'' BI? 
1034: CMP (RO) +,R1 TEST THE CMP 
BNE A034 ;BR IF ''27'' GOT CLEARED 
FAO34: HALT :CMP FAILED TO ACCESS PSwW 
BR BT034 SLOCK ON HARD ERROR 
A034: TST RO 3''7'' SHOULD SET 
BEQ BT035 “OR If "7 SET 
£2034: HALT ;CMP FAILED TO AUTO INC. RO 
BR BT034 :LOCK ON HARD ERROR 


F4 (ARR RAR SARA RASS RR RRRRERARAREARRRSRRR RE RA RRR A RRR AR RRR RRR RRR RRR RRR REE SB | 


.SBTTL BT035 **CMP RA,RB'’ TEST WITH CRA] = CRB) 


2 ARRAS SAAS RRS R SERA RRR RR RRRRRRR RARE RAR RRR RR RAR RRR RRR SRR RRR RRR RE RES SB] 


BT035: MOV #125252,R0 MAKE CROJ = 125252 
MOV RO,R1 s;MAKE [R13 = 125252 
ccc SCOPE SYNC 
1035: CMP R1,R0 sTEST THE CMP 
BEQ BT036 ;BR IF ‘'2"' GOT SET 
E035: HALT ERROR - CMP FAILED TO SET °'2"' 
BR BT035 ;LOCK ON HARD ERROR 


z ARRAS RA 22022222 RARER RRRERERERER ERAS RRA RR RA RRR RRR RRR RRR RRR RRR RRR ES S| 


-SBTTL BT036 ‘'CMP RA,RB'’ TEST WITH CRA] < [RB 


2 ARR RRRASASASASSSASASERAALESERERARRS RR RRRR RRR RRR RRR RRR RR RRR RRR REE SD 


BT036: MOV #25252,RO0 sMAKE CRO] = 25252 


CLR R1 MAKE [R1) = 000000 
SEZ SCOPE SYNC = SET °'2°° 
1036: CMP R1,RO i: TEST THE CMP 
BNE B1037 ;BR IF ‘'2°** GOT CLEARED 
£036: HALT ERROR - CMP FAILED TO SET *'2"' 
BR BT036 ;LOCK ON HARD ERROR 


Z SRATARARERRERARERAARERARRRRREERRERERRRRRH EKER eRe hee eneeeeteteenese 


SEQ 0034 
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CQKDA=E KD11=K BASIC LOGIC TESTS MACY1 
CQKDAE .P11 17=SEP=79 09:47 BT037 ' RA,RB'' TEST wITH CRA] > (RBI SEQ 0035 

1783 .SBITL BT037 ''CMP RA,RRB'' TEST WITH LRA] > (RBI 

1784 L RRR RARER ERE EEE REE ERREREEREREREERRERERRRR EAR ERE RE REE 

1785 

1786 002744 005000 BT037: CLR RO ;MAKE CROJ = 000000 

1787 002746 012701 000017 MOV #17,R1 sMAKE [R1] = 000017 

178 002752 000264 SEZ SCOPE SYNC = SET ‘'7'' 

1790 002754 020100 1037: CMP R1,RO :TEST THE CMP 

i 002756 001002 BNE BT040 ;BR IF ‘'27'' GOT CLEARED 

1794 002760 000000 £037: HALT ERROR = CMP FAILED TO SET ‘'7"' 

ye 002762 000770 BR BT037 LOCK ON HARD ERROR 

1797 Z (AR RERRSSRAR ARERR ARAAR ARERR RRS SSSR RRA SAR RRR ESE RRR SRS RRR RRR RRR RRR RRR RRS 

1798 .SBTTL BT040 ‘MOV (RA),RB'' TEST WITH CSOURCEJ=(RBIJ=17 

1799 SRE RR E ERE REE ER EERE EERE ERE 

1800 

1801 002764 012700 177776 BT040: MOV #PSwW,RO ;RO POINTS TO PSW 

1802 002770 C05010 CLR (RO) MAKE CPSWI=000 

1803 002772 005001 CLR R1 MAKE [R1J=000000 

180% 002774 000277 SCC sMAKE N:C=1111 

1806 002776 011001 1040: MOV (RO) RI :TEST THE MOV 

1808 003000 020127 000017 CMP R1,417 DID R1 GET LOADED WITH 000017 ? 

1808 003004 001402 BEQ BT041 iBR IF YES 

1811 003006 000000 £040: HALT MOV FAILED TO LOAD R1 

1812 003010 000765 BR BT040 LOCK ON HARD ERROR 

1813 PR RE RRR ERE RRA REE REEE ROR EEE EE 

1814 .SBTTL BT041 ‘MOV (RA)+,RB'' TEST WITH CSOURCEJ=(RBI=17 

1815 DOI III III IID IOIIOIDIDIIIOIOIOIIOIIIUIDIIOIIIUIUIIUIO I Rt kits 

1816 

1817 003012 012700 177776 BT041: MOV #PSW,RO :RO POINTS TO PSW 

1818 003016 005010 CLR (RO) MAKE CPSW1=000 

1819 003020 005001 CLR R1 MAKE [R1]=000000 

1820 003022 000277 Scc sMAKE N:C=1111 

1802 003024 012001 1041: MOV (RO)+,R1 TEST THE MOV 

1824 003026 020127 000017 CMP R1,M17 :DID R1 GET LOADED WITH 000017 ? 

1829 003032 001402 BEQ A041 :BR IF YES 

1827 003034 000000 FA041: HALT MOV FAILED TO LOAD R1 

1808 003036 000765 @R BT041 LOCK ON HARD ERROR 

1830 003040 005700 A041: TST RO 7''7'' SHOULD SET 

1831 003042 001402 BEQ BI942 :BR IF ‘'2'' GOT SET 

1833 003044 000000 £2041: HALT :MOV FAILED TO AUTO INC. RO 

18% 003046 000761 BR BT041 LOCK ON HARD ERROR 

1836 2 (ROBE RRSRRRRERSESES SER EREER SERRE RSE RRR ERASER SAR RRS ESR ERE R RRS RRR ERR SE BY 

1837 .SBITL BT042 "KOR RA,RB’’ TEST WITH CRA] = [RB] = 000000 


1838 LEAR AREER EERE REE ERE AAA AAA A RE RAREe 
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BT042 "KOR RA,RB'' TEST WITH CRA] = CRBJ = 000000 


B1042: CLR RO MAKE CROJ = 000000 
CLR R1 MAKE [R1] = 000000 
ccc ;SCOPE SYNC 

1042: XOR R1,RO TEST THE XOR 
TST RO ot ve —— t 
BEG BT043 :BR IF 

E042: HALT ;xOR FAILED 
BR BT042 


‘ LAR RRRSPSAAARASARASAASAASRRRASARR RS ER RRR RAR RRR RRR RR RR RRA RRA RRR RRR AS ES ESS DS 


-SBTTL BTC43 "KOR RA,RB'' TEST WITH CRA] = CRB] = 177777 


PY (ARRAS RESSASE SEA EA SER RAR ARR RR RASA RASA R ARRAS RARER RRR RRR SRR RAR RASS ES DS 


BT043: CiR RO sMAKE CRO] = 177777 
COM RO 
MOV RO,R1 Auk 177777 
ccc ‘SCOPE 

1043:  XOR R1,RO ; TEST THE XOR 
TST RO RESULT = 000000 ? 
BEQ BT044 = ;BR IF YES 

£043: HALT ;XOR FAILED 
BR BT043 ;LOCK ON HARD ERROR 


2 PARR RSSAASASLALASSLALASERASASARRRSASELALA SARA SALAS A RAR RR ARERR RRR RAR ED DO! 


.SBTTL BT044 ‘KOR RA,RB’’ TEST WITH CRBJ=052525,[RAJ=125252 


; LAR SSSSSSASASASE SRS ALAS ERRSRSR AAAS SERA S ARR RRR ASA RRR RRR RRR RRA SERA SS SSD 


BT044: MOV #125252,R1 sMAKE (R1]=125252 
MOV #052525.RO SMAKE [ROJ=052525 
CCC *SCOPE SYNC 

1044:  XOR R1,RO :TEST THE XOR 
CMP RO.#=1 sRESULT = 177777 ? 
BEQ BT045 ‘BR IF YES 

£044: HALT :XOR FAILED 
BR BT045 ‘LOCK ON HARD ERROR 


Z (ARO RRRRRSESSSSSELES ESE RAR PEER ERE SES AS ERR ARERR RRR ARERR SERRE RASA RRR SS SS 


-SBTTL BT045 ‘KOR RA,RB’’ TEST WITH CRAJ=052525,(RBJ=125252 


2 TPR RSSALSASLASZLSELESESESEERE SESE ESAS EERE RRR RRR SRR SRR RSA RR ARSE RS SASS 


BT045: MOV #125252.,R0 ihe CROJ=125252 
MOV #052525,R1 E (R1J=052525 
CCC -SCOFE SYNC 

1045: OR R1,R0 ; TEST THE XOR 


CMP RO ,#=1 RESULT = 177777 ? 


SEQ 0036 
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BT045 ‘KOR RA,RB'' TEST WITH [RAJ= 052595, CRBJ=125252 


BEQ B1046 ;BR IF YES 
£045: HALT :MOR FAILED 
BR BT045 ;LOCK ON HARD ERROR 


§ (RAS RSASAARSAAAAASAASALAALASS RRR ALAR SSSA RAR RRR ASRS RR RRR RRR SRR RSS EG 


.SBTTL BT046 GPR ADDRESS INTERRACTION TEST 


4 LAR RRRRAARALARAAAALSSESARE ERAS ALAS ESAS ERR ER RARER RRR RR RR RRR SRR RS ES SG 


BT046: MOV #125252,RO0 ;CROJ = 125252 
MOV RO,R1 
COM R1 3CR1] = 052525 
MOV R1,R2 
COM Re 3CR2] = 125252 
MOV R2,R3 
COM R3 :CR3J = 052525 
MOV R3,R4 
COM R4 3CR4] = 125252 
MOV R4,R5 
COM R5 3CR5] = 052525 
1046:  XOR R1,RO CROJ] S/B = 177777 
XOR R2,RO CROJ S/B = 125252 
xOR R3,RO CRO] S/B = 177777 
XOR R4,RO CROJ = S/B = 125252 
xOR R5,RO ;CROJ S/B = 177777 
COM RO :CROJ S/B = 000000 
BEQ A046 ;BR IF CROJ WAS 900000 
EAQ46: HALT :GPR ADDRESSING PROBLEM 
BR BT046 LOCK ON HARD ERROR 
A046: CMP SP ,ASTACK :DID R6 GET DISTURBED 
BEQ BASIC ;BR IF NOT 
E2046: HALT 3:R6 ADDRESS PROBLEM 
BR BT046 ;LOCK ON HARD ERROR 


SEQ 0037 


CQKDA-E_KD11-k BASIC LOG 
CQKDAE .P 71 17=SEP=79 
1933 

1934 

1935 

1936 

1937 003252 005037 
1938 003256 005037 
1939 003262 005037 
1940 003266 012701 
1941 003272 00502 
1942 003274 020127 
1943 003300 001374 
1944 003302 012706 
1945 003306 012737 
1946 003314 012737 
1947 

1948 

1949 

1950 

1951 

1952 003322 

1953 003322 012700 
1954 003326 000257 
1955 

1956. 003330 

1957 003330 001002 
1958 

1959 003332 000000 
1960 003334 000774 
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1962 
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1964 

1965 003336 

1966 003336 012700 
1967 003342 000264 
1968 

1969 003344 001001 
1970 

1971 003346 000402 
1972 

1973 003350 000000 
1974 003352 000773 
1975 
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1977 

1978 
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1984 003362 001402 
1986 003364 000000 
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BT046 GPR ADDRESS INTERRACTION TEST 


ee ees oe Pein ae 2 Fe Peo 
/ / ¢ f¢ ff f BASIC INSTRUCTION TESTS / / / / / / 
SS ECCELOCECEECESESELESESESEDIOEOSOSIOESOSODEEEDSOSEEESESESELOLELOLS 


BASIC: CLR @VONCE ; SIGNAL PROGRAM HEADER TO BE “gone 
C ;CLEAR ERROR COUNT FIRST TIME THROUGH 
CLEAR PASS COUNT FIRST TIME T 


INIT: MOV ro) ates R1 ;SET UP TO INIT. COUNTERS AND FLAGS 
1$: CLR (R1) CLEAR ONE WORD 
oa al. VHONCE ; CLEARED a. FLAGS AND COUNTERS? 


:BR_IF NO 
MOV ASTACK,SP SET UP THE STACK POINTER 
MOV #4030,@4UBREAK SET SCOPE SYNC FOR COND CODE OPERATE 
MOV #-1 ,AASREGS [FLAG CURRENT STACK POINTER TO BE TYPED 
IN FIRST ERROR CALL 


CTR REREEERERKEK EEE 


;*TEST O BASIC ‘BNE'’ TEST WITH Z=0 
J DRE REE EKER EERE ERE RRR ERE REE REE EEE 
TSTO: 
MOV #0,RO ;7LOAD RO WITH TEST NUMBER 
1$: ccc sMAKE Z=0 
2$: 
BNE TST1 72 TEST THE BNE - IT SHOULD BR 
38: HALT ;BNE FAILED TO LOAD PC 
BR 1$ \ ;LOCK ON HARD ERROR 
CIARA REE KER REE EERE EKER REECE EERE EEE 
s*TEST 1 BASIC 'BNE'' TEST WITH Z=1 
STEAK RRR ERE REE ERE EREREEREEEEREEKREEEREREEK KEES 
TST1: 
MOV #1,R0 :7LOAD RO WITH TEST NUMBER 
1$: SEZ 7SET THE ‘'2°' BIT ‘ 
2s: BNE 3$ ‘ 7 TEST THE BNE - IT SHOULD NOT BR 
BR TST2 3:GO TO NEXT TEST 
3$: HALT ;BNE BRANCHED WITH Z=1 
BR 1$ ;LOCK ON HARD ERROR 
Terni a ieee meray daglr nnd antenatal tana 
:*TEST 2 BASIC ‘BEQ'’ TEST WITH Z=1 
'MeASAAREASAARZASSSESAALES ES ERE SSSR EEE RES ESE RRR ERS ERR SSSR ESE RRR REA SS 
ié12: 
MOV #2,R0 : LOAD RO WITH TEST NUMBER 
1$: SEZ sMAKE Z=1 
2$: 
BEQ TST3 i: TEST THE BEQ - IT SHOULD BR 
3$: HAL T ;BEQ FAILED TO LOAD THE PC 
BR 1$ ;LOCK ON HARD ERROR 


PLAS RARER AERA AERA REA AAARARAREEEAREREAREREARRREEE RRR RARER 


SEQ 0038 
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13 BASIC ‘BEQ'' TEST WITH 2=0 


seTEST 3 BASIC ‘BEQ'’’ TEST WITH Z=0 
TORRE RECAAALAAAAAASEAAESAREAEER EERE EE REESE REE ERR RRR RRR RRR SRR R RE SD 
+éT3: 
MOV #3,RO0 ;;LOAD RO WITH TEST NUMBER 
18: CCC sMAKE 2=0 
2$: BEQ 3$ ; TEST THE BEQ = IT SHOULD NOT BR 
BR TST4 3:GO TO NEXT TEST 
3$: HALT ;BEQ BRANCHED WITH Z=0 
BR 1$ ;LOCK ON HARD ERROR 
SL RAR AREER TEER ERR EERE ERERAREERRA RARER REREAD 
S*TEST G BASIC 'BPL'’ TEST WITH N=1 


SARA ARERR ERE ERE REERR RR EEREEEREERAERRERRERERERKAE ARREARS 


TST4: 


MOV #4 RO ; LOAD RO WITH TEST NUMBER 
1$: CLR aAPSW :CLEAR THE PSW 
SEN “MAKE N=1 
2$: BPL 3$ ;TEST THE BPL - IT SHOULDN'T BR 
BR TST5 3:GO TO NEXT TEST 
3$: HALT ;BPL BRANCHED WITH N=1 
BR 1$ ;LOCK ON HARD ERROR 
LLU REE ERE REE REE EERE REE ERRRERER ARERR ERS 
s*TEST 5 BASIC ‘BPL"' TEST WITH N=0 


SAE EERE ERE REE AE EERE ERA REAR ERE EERE REE RERE REE E ER 


TSTS5: 


MOV #5,R0 ;7LOAD RO WITH TEST NUMBER 
1$: CLR aAPSw :CLEAR THE PSW 
ccc SCOPE SYNC 
2s: 
BPL TST6 ;z TEST THE BPL - IT SHOULD BR 
3$: HALT ;BPL FAILED TO LOAD THE PC 
BR 1$ ;LOCK ON HARD ERROR 
LL UAAAAAAAAAAAARARAEAERAEARERARERERRERARAAERARRARAEAARARAERERE AREER 
s*TEST 6 BASIC ‘MOV (RA),RB‘’’ TEST = (RA)=177776 
LL UAE ARERR AR ERR E EERE EERE EERE RERE ERE REE RR ERE E EAE ES 
TST6: 
MOV #6 RO 7 ;LOAD RO WITH TEST NUMBER 
MOV #PSW,RS :SOURCE ADDR = 177776 
1$: CLR (R5) “MAKE 1) a bones 
CLR R3 ; (DEST 000000 
SCC “MAKE CPSwJ=017 
23: MOV (R5),R3 ; TEST THE MOV 
CMP R3,417 : CORRECT RESULT ? 
BEQ TST? >;BR IF YES 


SEQ 0039 
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CQKDA-E KD11-K we} LOGIC TE GE 4 
CQKDAE .P*1 17=SEP=79 09:47 T6 BASIC "MOV (RA),RB’' TEST = (RA)= 197776 SEQ 0040 
2065 
2040 003476 000000 3$: HALT SERROR-MOV FAILED 
2047 003500 000767 BR 1$ ;LOCK ON HARD ERROR 
2048 ERRATA RARE EER ARERR EERE EEREREREREERERRERREREE EERE EH EEE 
;*TEST 7 BASIC ‘‘CMP RA, (RB)'’ TEST = CRA] = (CDESTI 
2050 Sith atala la lehahatateheheiaicheheiehahalcheheiahaiaieieiaheieiciaiehaiaioiaieieieisiaiaiaiaiaioieiaiaiaiaiaiaiaieieieieieiatehel 
2051 003502 TST?: 
2052 003502 012700 000007 MOV #7 RO Jip ~ a WI TH TEST NUMBER 
2053 003506 012702 063316 MOV MBF 0 Re. DEST ‘as 
2054 903512 012704 125252 MOV #125252,R FRESULT 87 Be 125252 
2055 003516 012737 125252 063316 1$: MOV #125252, SaMBUF 0 iMAKE CDEST] = 125252 
Spas 003524 000257 ccc [MAKE N:C=0000 
pit 003526 020412 2s: CMP R4,(R2) ;TEST THE CMP 
et 603530 001402 BEQ TST10 7:BR IF ‘'27°' GOT SET 
2062 003532 000000 3$: HAL T ;ERROR - CMP FAILED TO SET ‘'7"' 
2063 003534 000770 BR 1$ ;LOCK ON HARD ERROR 
2064 j ASER RARER ERR REET EERE: CREE REE EERE RRR R EERO REE REE REE EEE 
2065 s*TEST 10 BASIC ‘'CMP RA,(RB)'' TEST - CRAJ NOT EQUAL TO ([DESTJ 
2066 RRR EEE REE REE ERERERE ES 
2067 003536 1$T10: 
2068 003536 012700 000010 MOV #10,R0 ot a ~ A WITH TEST NUMBER 
003542 012702 063316 MOV AMBUFO,R2 DES = MBUFO 
2070 003546 012704 000001 MOV #1,R4 eRESULT a “B= 000001 
2071 003552 005037 063316 1$: CLR @4MBUF 0 “MAKE [DEST] = 000000 
oor8 003556 000264 SEZ sMAKE N:C=0100 
Sore 003560 020412 es: CMP R4,(R2) ;TEST THE CMP 
oN 003562 001002 BNE TST11 77BR IF *'27'* GOT CLEARED 
2078 003564 000000 3$: HAL T sERROR - CMP FAILED TO CLR ‘'7'' 
2079 003566 000771 BR 1$ ;LOCK ON HARD ERROR 
2081 DOI IIOIIIUIIIIIOIUIIUIUIUIIIIIOIU REE Ente tnt ehhh tes 
2082 E@TEST 17 BASIC ‘'CMP #N,R'’ TEST - N = CR] 
3 DD ERE EEE ERE RE ER ERA Ree 
2084 003570 TST11: 
2085 003570 012700 000011 MOV #11,R0 7 ;LOAD RO WITH TEST NUMBER 
2086 003574 012704 125252 MOV #125252,R4 :RESULT S / B = 125252 
2087 003600 010403 1$: MOV R4,R3 :CDEST] = 125252 
ie 003602 000257 CCC : SCOPE SYNC 
aise 003604 022703 125252 e$: CMP #125252,R3 ;TEST THE CMP 
ass 003610 001402 BEQ 4$ ;BR IF N = [RJ] 
2094 003612 000000 3$: HALT 7 CMP FAILED 
2095 003614 000771 BR 1$ ;LOCK ON HARD ERROR 
2097 003616 020403 4$: CMP R4,R3 DID CMP ALTER [DEST]? 
on 003620 001402 BEQ TST12 77BR IF NO 


2100 003622 000000 5$: HAL T 7 CMP DELIVERED A RESULT 
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111 “CMP WN,R' TEST = N = [RI 


BR 1$ ;LOCK ON HARD ERROR 
te RAEAARRAERARARAAAKEARERAKRARERAAERAARARARARARAARARARARARKRARKRKREREAHRAKRAREAH EAD 
T*TEST 12 BASIC "CMP #N,R'’ TEST = N NOT EQUAL TO [RJ 
fC TAAAARAAAAARAARRAAAAAARARERARRAARARARRARRARARARRARRARARARAARAAED 
TST12: 
MOV #12,R0 Here RO WITH TEST NUMBER 
CLR RS RESULT S$ . B = 000000 
1$: MOV R4,R3 :(DESTI = 125 252 
SEZ [SCOPE SYNC 
es: CMP #1,R3 ZTEST THE CMP 
BNE 4$ ;BR IF N NOT EQUAL TO [RJ] 
3$: HAL T 7 CMP FAILED 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP R4,R3 :DID CMP ALTER [DEST]? 
BEQ T8713 + :BR IF NO 
5$: HALT :CMP DELIVERED A RESULT 
BR 1$ ;LOCK ON HARD ERROR 


en ee ee Tn 


s*TEST 13 BASIC "MOV RA,(RB)** TEST 


SERRE ARAERAEREEREREARKEAEKEERAAERERARAEKEEAEAKERORKERKERAEREEEREKEE EE 


S113: 


MOV #13,RO ;LOAD RO WITH TEST NUMBER 
MOV AMBUF 0 ,R2 “BEST ADDR=MBUF 0 
MOV #-1,R4 RESULT S /_B = 177777 
1$: CLR (R2) MAKE CDEST] = 000000 
CCC SCOPE SYNC - N:C=0000 
2$: MOV R4,(R2) i: TEST THE MOV 
CMP R4, (Re) RESULT CORRECT ? 
BEQ TST14 ;;BR IF YES 
3$: HAL T sERROR ~ MOV FAILED 
BR 1$ ;LOCK ON HARD ERROR 


5 SAAR AAAEREEAAARRAEAAAEAAERERKKARAERARAKRAAARARARARERAARAAAEAARR ERED 


S*TEST 14 BASIC ‘MOV #N,(R)'’ TEST 


SL AAA AAR AERA ARAERAEAEERAKEAEAERARAERAAERARKERARAARARAERR RE RR ES 


TST14: 


MOV #14,R0 >;LOAD RO WITH TEST NUMBER 
MOV AMBUFO,R2 :DEST ADDR = MBUFO 
MOV H-1,R4 sRESULT S / B = 177777 
1$: CLR (R2) :MAKE [DEST] = 000000 
CCC ;SCOPE SYNC 
2$: MOV #-1,(R2) s TEST THE MOV 
CMP R4,(R2) sRESULT OK ? 
BEQ 1ST15 ‘BR IF YES 
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CQKDA=E_KD11-K BASIC LOGIC TE 
CQKDAE .P11 17=SEP=79 09:47 114 BASIC ‘MOV #N,(R)"’ TES SEQ 0042 
2157 
2158 003744 000000 3$: HAL T sERROR = MOV FAILED 
$125 003746 000770 BR 1$ :LOCK ON HARD ERROR 
$161 PLU EEE EERE EERE EERE ERE RRR REET ERE 
2162 s*TEST 15 BASIC 'MOVB 4N,X(R)'' TEST = DEST EVEN 
2163 LL RAR REE RER ERRATA ERE ER EERE EE 
2164 003750 TST15: 
2165 003750 012700 000015 MOV #15,RO ;LOAD RO WITH TEST NUMBER 
2166 003754 012704 177401 MOV #177401 ,R4 “RESULT S / B = 177401 
2167 003760 012702 063322 MOV A#MBUF 1 ,R2 :DEST ADDR = MBUF1 
2168 003764 012705 063316 MOV AMBUF 0 ,R5 BASE DEST er MBUF 0 
2169 003770 012712 177777 1$: MOV #-1, (RO) ;CDEST] = 177777 
$0 003774 000257 CCC ; SCOPE SYNC 
$156 003776 112765 000001 000004 2$: MOVB #1,4(R5) TEST THE MOVB 
2174 004004 020412 CMP R4, (R2) RESULT OK? 
Ape 004006 001402 BEG TST16 :;BR IF YES 
2177 004010 000000 3$: HAL T :MOVB DELIVERED WRONG RESULT 
si55 004012 000766 BR 1$ ;LOCK ON HARD ERROR 
2180 DORIC IOIUISIOIIOIIDIDIOIOIIOIUIOIOIUIOIIOIOIUIOIOIDISIOIIOIDIDIDIUIDIIOIOIIDIDIDIDIDIDIDIN DIDO tot 
2181 s*TEST 16 BASIC 'MOVB 4N,X(R)'' TEST - DEST ODD 
2182 CD IIIIOIIIIIIIIOIDIIDIIOIUIOIOIIDIOIOIIOIOIOIOIOIIOIUIOIUIOIDIOIOIOIUIUIOIOIIO IOI IDIDIDIDIOIDI IOI 
2183 004014 TST16: 
2184 004014 012700 000016 MOV #16,R9 ;LOAD RO WITH TEST NUMBER 
2185 004020 012704 000777 MOV #777 .R4 :RESULT S / B = 777 
2186 004024 012702 063322 MOV AMBUF 1 ,R2 :DEST ADDR = MBUF I 
2187 004030 012705 063316 MOV AMBUF 0 .R5 ZBASE DEST ~~, MBUF 0 
2188 004034 012712 177777 1$: MOV #-1,(R2) ;CDESTJ = 177777 
4424 004040 000257 cCC ;SCOPE SYNC 
tha) 004042 112765 000001 000005 2$: MOVB #1,5(R5) TEST THE MOVB 
2193 004050 020412 CMP R4, a sRESULT OK? 
Abe: 004052 001402 BEQ TST17 ::BR IF YES 
2196 004054 000000 3$: HAL T :MOVB DELIVERED WRONG RESULT 
3h4 004056 000766 BR 1$ ;LOCK ON HARD ERROR 
2199 : ait. Gar ae Ge ee ane 
2200 S*TEST 17 BASIC ‘TST " TEST WITH CA] GT 0 
2201 : ll TET sae = tS I rae FO tw io ht ET 
2202 004060 S117: 
2203 004060 012700 000017 MOV #17,RO ;LOAD RO WITH TEST NUMBER 
2204 004064 012702 063316 MOV AMBUF 0 ,R2 DEST ADDR = MBUFQ 
2205 004070 012704 000377 MOV #377 ,R4 ZRESULT S /_B = 377 (NO CHANGE) 
2206 004074 010412 1$: MOV R4,(R2) 43th = 377 
Soha 004076 000257 ccc SCOPE SYNC 
$5 004100 005737 063316 2$: TST @AMBUF C0 TEST THE TST 
2211 0041 001401 BEQ 3$ :BR IF "'7'* SET = IT SHOULDN'T BE 


04 
2°12 004106 100002 BPL TST20 >;BR IF 'N' CLEAR ~ IT SHOULD BE 








COKDAME KDII=K BASIC LOGIC TESIS 
COKDAE.P11 =»: 7=SEP=79 09:47 
2213 
2214 006110 000000 
2215 004112 000770 
2216 
2217 
2218 
2219 004114 
2220 004114 012700 0000 
2221 004120 012702 063316 
2222 004124 012704 100000 
2223 004130 010412 
2224 004132 000257 
2226 004134 005737 063316 
2228 004140 001401 
2229 004142 100402 
2230 
2231 004144 0 
2232 004146 000770 
2238 004150 020412 
2234 004152 001402 
2235 
2236 004154 000000 
2237 004156 000764 
2238 
2239 
2240 
2241 
2242 004160 
2263 004160 012700 000071 
2244 004164 012702 063316 
2245 004170 005004 
2246 004172 005012 
2247 004174 000257 
2248 
2249 004176 005737 063316 
2250 
2251 004202 001402 
2252 
2253 004204 000000 
2254 004206 000771 
2255 : 
2256 004210 020412 
2257 004212 001402 
2258 
2259 004214 000000 
2260 004216 000765 
2261 
2262 
2263 
2264 
2265 004220 
2266 004220 012700 000022 
2267 004224 012702 063316 
2268 004230 012704 040000 
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MACY11 30A(1052) 

117 BASIC “TST @AA*’ TEST WITH [A] GT 0 

3$: HALT ;TST FAILED TO ALTER CODES PROPERLY 
BR 1$ [LOCK ON HARD ERROR 


jp URRRA RRR RANE E RENTER RN ER ERROR RE RRR RR RRR RR RARER 


S*TEST 20 BASIC "TST a@#A'’ TEST WITH CA] LT 0 
MPRA BSAAESASSRASZASASASRSRRRESESR ERAS SRR SL ERASERS RRS ERE RES ERR ERR SERRE 
+8120: 
MOV #20,R0 sLOAD RO WITH TEST NUMBE R 
MOV AMBUFO,R2 “BEST ADDR = MBUFO 
MOV #100000,R4 “MAKE S / B = 100000 
1$: MOV R4, (R2) :MAKE [DEST] = 100000 
CCC :SCOPE SYNC 
28: TST @AMBUF 0 sTEST THE TST 
BEQ 3g :BR IF ‘'2'' SET = IT SHOULDN'T BE 
BM] 4$ “BR IF 'N'' SET = IT SHOULD BE 
3$: HALT :TST FAILED TO ALTER CODES PROPERLY 
&R 1$ ‘LOCK ON HARD ERROR 
4$: CMP R4, (RZ) :DID TST DISTURB [DEST] ? 
BEQ TST21 :;BR IF NOT 
S$: HALT :TST DELIVERED A RESULT 
BR 1$ :LOCK ON HARD ERROR 
LARA RARER KEE ERE ERE ERE ERE REE EREREEERRAEREEEREREERER ERE ER 
T*TEST 21 BASIC ''TST a@M#A'' WITH CA] = 0 
SERRA REE AEAA EEE ERE A ERE E EERE REE EERE RERREREREREERRERE EER 
TST21: 
MOV #21.,R0 :LOAD RO WITH TEST NUMBER 
MOV AMBUFO,R2 “BEST ADDR = MBUFO 
CLR RG SRESULT S / B = 0 (IT SHOULDN'T CHANGE 
1$: CLR (R2) :CDEST) = 
CCC *SCOPE SYNC - 7=0 
2$ TST @AMBUF 0 : TEST THE TST 
BEQ 4$ :BR IF TST SET ''2"' 
3$ HALT :TST FAILED TO SET ‘'2"' 
BR 1$ *LOCK ON HARD ERROR 
4$ CMP R4, (R2) s(DEST] STILL = 000000 
BEQ TST 22 :;BR IF YES 
5$ HALT :TST ALTERED THE CesT] 
BR 1§ “LOCK ON HARD F 
LL AERA ARERR ARERR EERE ARERR ARERR RAAEAERARERA ARR RR ERE AS 
SeTEST 22 BASIC 'BIT #N,a#A'' WITH BIT SET IN ‘‘A'' 


, REAR KER AA AREA KREA AREER ERR AEARARAEKREKEKAERR ERE REE 


1$122: 
MOV #22,R0 ::LOAD RO WITH TEST NUMBER 
MOV AMBUFO,R2 :DEST ADDR = MBUFO 
MOV #40000,R4 SRESULT S / B = 40000 


CQKDA=F KD11-K BASIC 
CQKDAE .P11 


004234 
904236 


004240 
004246 


L 
17=SEP=7 


010412 
000277 


032737 
001002 


000000 
000770 


032737 
091402 


000000 
000770 


005712 
001402 


000000 
000764 


012700 


005722 
001402 


000000 
000772 


022702 
001402 


000000 


“8 


040000 


000024 
000001 


063316 


063320 


063316 


063216 


063249 
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T2e BASIC ‘BIT @N,@MA'’ WITH BIT SET IN ‘'A"' 


1$: MOV R4,(R2) sMAKE CDESTI = ee 
SCC :SCOPE SYNC = Z=1 
2s: BIT #40000, a4MBUFO ;TEST THE BIT 
BNE TST23 ;;BR IF Z=0 - IT SHOULD BE 
3$: HAL T sBIT FAILED TO CLEAR ‘2°’ 
BR 1$ ;LOCK ON HARD ERROR 
FFARR AARAAEREARREAARRAARARRREHRERERKRRAEAARRRARRRAARARRRRH EERE 
r*TEST 23 BASIC ‘BIT A@N,a4A'’ WITH BIT CLEAR IN ‘‘A’' 
fF AAARARAAARARARRERARRARARERAERAAKRARARARRARARRRERHERRARRARRERAAARRAED 
TST23: 
MOV #23,R0 :LOAD RO WITH TEST NUMBER 
MOV AMBUFO,R2 “BEST ADDR = MBUFO 
1$: CLR (R2) “MAKE CDEST] = 000000 
CCC ;SCOPE SYNC = Z=0 
2$: BIT #40000, a4MBUFO ;TEST THE BIT 
BEQ 4% ;BR IF Z=1 - IT SHOULD BE 
3$: HALT ;BIT FAILED TO SET ‘'2°' 
BR 1$ ;LOCK ON HARD ERROR 
4$: TST (R2) :DID BIT DELIVER A RESULT 
BEQ TST24 ;;BR IF NOT 
5$: HALT ;BIT DISTURBED in CDESTJ 
BR 1$ ;LOCK ON HARD ERR 
“Speen pment aaetmanaanttaig pag ditt gaia allen aa alana italian 
I*TEST 24 BASIC ‘TST (R)+'' TEST 
MESSE SSR RRR R RRR ESR RRR RRR SE REESE RRR RRR RRR RRR RRR RRR RRR RRR RRR RSS BG 
TS126: 
#24 ,RO LOAD RO WITH TEST NUMBER 
.SBTTL USER CONTROLLED BREAKPOINT’ -- BITO 
BIT 1 hae @A4BPTLOC ;BREAKPOINT HALT SET ?? 
BEQ ;BR IF NOT 
HALT ;BREAK - DEPRESS CONTINUE TO RESTART 
MOV #MBUFO,R2 Z INITIAL DEST ADDR = MBUFO 
1$: CLR (R2) “MAKE [DEST] = 000000 
CCC ; SCOPE SYNC 
2$: TST (R2)+ TEST THE TST 
BEQ 43 :BR IF ‘'7"' SET = IT SHOULD BF 
3$: HALT ;TST FAILED TO SET *‘7°' 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP ts ae 2.R2 ;DID REG. GET AUTO-INCREMENTED ? 
BEQ TST25 >;BR IF YES 
5$: HALT sTST FAILED -10 UPDATE REGISTER 


SEQ 0044 
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USER CONTROLLED BREAKPOINT -=- BITO 


BR 1$ ;LOCK ON HARD ERROR 


SLR ARAR RRA RRE AREER E TERRA RRE ERE REARERERERR ERROR ERE ERE 


TeTEST 25 BASIC "TST <(R)'' TEST 


VERO RRRRRARRERARRSRARRR RRR RRRRR RRR RARER RRR RR RA RRR RRR ARRAS RRR RASS! 


15725: 


MOV #25,R0 :LOAD RO WITH TEST NUMBER 
MOV #DWTA+6,R2 BEST ay = DwTA+6 
MOV #377 RS RESULT S / B = 377 
i$: MOV #DWTA+10,R5 “BASE DEST ADDR = DwTA+10 
SEN *SCOPE SYNC 
2%: TST =(R5) :TEST THE TST 
BPL 4$ :BR IF 'N'' CLEAR 
3$: HALT :TST FAILED TO CLEAR 'N'’ 
BR 1$ *LOCK ON HARD ERROR 
4$: CMP R5,R2 :DID DEST REG GET DECREMENTED? 
BEQ 6$ “BR IF YES 
S$: HALT ZERROR - TST FAILED TO UPDATE DEST REG 
BR 1$ =LOCK ON HARD ERROR 
6$: CMP RG, (R2) :DID TST ALTER [DEST]? 
BEQ TST26 77BR IF NOT 
7$: HALT :TST ALTERED [DEST] 
MOV RG, (R2) sRESTORE [DEST] 
BR 1$ =LOCK ON HARD ERROR 
LIAR AARAARAEAEERARRARAEREAERRARAAKRARRARAAAAAAAAHKARARAERERRAA AHHH 
S*TEST 26 BASIC "COM aM#A'' TEST 


Eee ee eee eR RRR RRR RRR R RRR RR RRR RR RR RRR RR RR RRR RRS RR RRR RRR RRR ARSED DB! 


1S126: 


MOV #26,R0 ;7LOAD RO WITH TEST NUMBER 
MOV A#MBUF 0 ,R2 :DEST ADDR = MBUFO 
CLR RS RESULT S / B = 177777 
COM RS 
1$: CLR (Re) MAKE = * 000000 
CCC 3 SCOPE SYNC 
2$: COM GAMBUFO ; TEST THE COM 
CMP R4,(R2) sRESULT = 177777 ?? 
BEQ TST27 33BR IF YES 
3$: — *" 7COM DELIVERED THE WRONG RESULT 


WERE RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRS SD DD 


SeTEST 27 BASIC “INC @fA'' TEST 


CF UPAR AAAA TAA AARENARAHEAAARRARERERARARAHEREAAARRAREAHEARAS HARES 
TST27: 
MOV #27,R0 ;7LOAD RO WITH TEST NUMBER 


SEQ 0045 
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2381 004500 012702 063316 
2382 004504 012704 000100 
2383 004510 012712 000077 
2384 004514 25 
2385 
2386 004516 005237 063316 
2388 004522 620412 
2389 004524 001402 
2390 
2391 004526 
2392 004530 000767 
2393 
239% 
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2398 004532 012700 000030 
2399 004536 012703 000001 
2400 004542 000257 

2401 

2402 004544 005303 
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2404 004546 005703 

2405 004550 001402 

2406 

2407 004552 000000 

2408 004554 000770 

2409 
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2411 
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2413 004556 

2414 004556 012700 000031 
2415 004562 012704 177777 
2416 004566 012702 063316 
2417 004572 905012 

2418 004574 25 

2419 

2420 004576 005337 06331¢ 
2422 004602 020412 

2423 004604 001402 

2424 
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2426 004610 000770 

2427 

2428 

2429 

24 30 

2431 004612 

2432 004612 012700 000032 
2433 004616 012702 063320 
2434 004622 005004 

2435 004624 012705 063316 
2436 004630 012712 177777 
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MAC 
T27 BASIC “"INC @AA'' TEST SEQ 0046 
MOV AMBUFO,R2 ;DEST ADDR = MBUFO 
MOV #100,R4 RESULT S / B = 100 
1¢- MCV #77, (R2) :CDESTJ = 77 
CCC SCOPE SYNC 
2$: INC @AMBUF 0 ;TEST THE INC 
CMP R4,(R2) DID RESULT = 100 ?? 
BEQ TST306 7 ;BR IF YES 
3$: HALT ZINC DELIVERED WRONG RESULT 
BR 1$ LOCK ON HARD ERROR 
FF ERAARARAAAERAAARARARARRERAEARARRERARRRRARARRARRRARRERRRRARAARAA AER 
:*TEST 30 BASIC ‘DEC RN’' TEST 
SF ERAAAARAEAAARERAERKERRAARERAARAKERAARAARARARRAAARARARRRARRRRRARAAS 
TST30: 
MOV #30,R0 “LOAD RO WITH TEST NUMBER 
1$: MOV #1,R3 “EDEST T] = +1 
CCC * SCOPE SYNC 
cs: DEC R3 ; TEST THE DEC 
TST R3 “aa iF Y 000000 ?? 
BEQ TST31 ssOR IF ¥ES 
3$: HAL T at DELIVERED THE WRONG RESULT 
BR 1$ LOCK ON HARD ERROR 
SF RAAAARAAAAAAKAEKARARKAREHARRRRAERAKARAAAARARAARERRARARAARRARARAAAHR 
seTEST 31 BASIC 'DEC a@A#A'' TEST 
SF AATEARARAARAARARARAEAARKKARAKRARARAARAEARRARRARRARRARARAAARRAREREHEES 
TST31: 
MOV #31,R0 3; LOAD 7 WITH ny NUMBER 
MOV #-1 RS sRESULT S / B = 177777 
MOV AMBUFO,R2 “DEST ADDR = MBU Ma 
1S: CLR (R2) :MAKE CDESTJ = 000000 
CCC ;SCOPE SYNC 
2s: DEC QAMBUF 0 : TEST THE DEC 
CMP R4,(R2) sDID RESULT = 177777 ?? 
BEQ TST32 : BR IF YES 
3$: HAL T DEC DELIVERED WRONG RESULT 
BR 1$ :LOCK ON HARD ERROR 
FFARR ARRAAA RARER REARRREAEAERRARARRAARAEAERAARAHARRARAAARAERERARAE 
s*TEST 32 BASIC ‘CLR X(R)"' TESTS 
SF AAAAARAAAAAARAARERAARAKEARARAKARAAAAAKKORAERAARAAAAARARHARARRK ARE 
TST32: 
MOV #32,R0 ZLOAD RO WITH TEST NUMBER 
MOV A#MBUF 0+2,R2 BEST a% = MBUF 0+2 
CLR R4 RESULT S / B = 000000 
1$: MOV A#MBUF ORS “BASE DEST ADDR = MBUFO 


MOV #-1,(R2) :(DEST] = 177777 
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BASIC “CLR K(R)'* TESTS 


CLR 2(RS) 
CMP R4, (R2) 
BEG S733 


; SCOPE SYNC 
sTEST THE CLR 


RESULT = Q? 
33BR IF VES 
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T32 BASIC ‘'CLR X(R)** TESTS 


3$: HALT ;CLR FAILED TO ZERO [CDESTJ 

BR 1$ ;LOCK ON HARD ERROR. 
PLR EERE EERE E EERE EERE ER REET REE Ree 
*TEST 33 BASIC "‘ASL RN’ TEST WITH CDESTJ=125252 AND ((0) 


VER aA See RRR RRR RRR RRR RRR R RRR RRR RR RR RRR RRR RRR RRR RRA R ARRAS RRR SRDS SD 


1$133: 


MOV #33,R0 ::LOAD RO WITH TEST NUMBER 
1$: MOV #125252,R3 “MAKE [DEST] = 125252 
CCC “MAKE C=0 
2$: ASL R3 :TEST THE ASL = IT SHOULD SET ‘‘C’' 
BCS 4$ :BR If ‘'C'' GOT SET 
3s: HALT sASL FAILED TO SET ‘‘C’’ BIT 
BR 1$ :LOCK ON HRD ERROR 
4$: CMP #52524 ,R3 zWAS RESULT = 52524 ?? 
BEQ TST34 *:BR IF YES 
S$: HALT :ASL DELIVERED THE WRONG RESULT 
BR 1$ ‘LOCK ON HARD ERROR 
SLA RARER REEEKEEER ERE ERR ERKEERRERER EE 
TSTEST 36 BASIC ‘'ASL RN'' TEST WITH CDESTJ=052525 AND C(1) 
CD ARR AR REA EEREREEKEEA ARERR ERR ERRAERERKERRERRRAERAAEATERERERAE EEE © 
TST34: 
MOV #34 RO LOAD RO WITH TEST NUMBER 
1$: MOV #052525,R3 ‘iMAKE [DEST] = 052525 
SEC ‘MAKE C=1 
2$: ASL R3 :TEST THE ASL - IT SHOULD CLR ‘‘C'' 
BCC 4$ :BR IF ‘'C'' GOT CLEARED 
3$: HALT :ASL FAILED TO CLEAR ‘‘C*' 
BR 1$ LOCK ON HARD ERROR 
4$: CMP #125252,R3 sRESULT = 125252 ?? 
BEQ TST35 ::;BR IF YES 
S$: HALT ZASL DELIVERED WRONG REULT 
BR 1$ [LOCK ON HARD ERROR 
[DUPE E NOOO EIU UOO OOOO TU SIE SORES SES REE TEER EERE EER ERE 
S*TEST 35 BASIC ‘ROL RN'' TEST WITH CDESTJ=125252 AND C(O) 
MPSS eSSRESRESERSSASR SSSR ESSERE R ESAS ERA RA RS RRR RRR RRR R RRR RR RRR RAS SS OG 
1S135: 
MOV #35,RO ::LOAD RO WITH TEST NUMBER 
1$: MOV #125252,R3 ‘WAKE [DEST] = 125252 
CCC “MAKE (=0 
2$: ROL RZ :TEST THE ROL = IT SHOULD SET ( 
BCS 4$ :BR IF ‘'C'' GOT SET 
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735 “ROL RN'’ TEST WITH toes fi 125252 AND C((0) 
3$: HALT ;ROL FAILED TO SET ‘'C'’ 

BR 1$ ;LOCK ON HARD ERROR 
4$: CMP #052524 ,R3 ;RESULT = —_—— ?? 

BEQ TST36 :;BR IF Y 
5$: HALT ;ROL DELIVERED WRONG RESULT 

BR 1$ *LOCK K ON HARD ERROR 
SF RAAARRARERERARRERERRERRERRKERRARRRRAKRAERARAERHRERERARRARRARAEKES 
s*TEST 36 BASIC ‘ROL RN‘ TEST WITH CDESTJ=052524 AND C(1) 
TRAE RARAAERRAAEAAEARARRERRAREKERERARRAAAAAERRERAERARARRERRARHRRREE 
TST 36: 

MOV #36,RO ; LOAD RO WITH TEST NUMBER 
1$: MOV #052524,R3 sMAKE CDEST] = 052524 

SEC ;MAKE C=1 
e$: ROL R3 ; TEST THE ROL - IT SHOULD CLEAR C 

BCC 4$ ;BR IF ‘'C’' IS CLEAR 
3$: HALT ;ROL FAILED TO CLEAR ‘'C’’ 

BR 1$ :LOCK ON HARD ERROR 
4$: CMP #125251,R3  * Dail ?? 

BEQ 1S) Sv + :BR IF 
5$: HALT ;ROL DELIVERED WRONG RESULT 

BR 1$ :LOCK ON HARD ERROR 
LL RRR REE REE EEE AEE REE RRR REE REE EERE ERE ERE EEE 
s*TEST 37 BASIS ‘‘TSTB (R)*' TEST - EVEN ADDRESS 
DDR RTE RRR KER ERK EEE EERE EERE RRR ERE REREAD 
TST37: 

MOV #37,R0 ; LOAD RO WITH TEST NUMBER 

MOV #DWTA+6,R2 ;DEST ADDR = DWTA+6 

MOV #377 ,RSG sRESULT S / B = 377 
1$: CCC ;SCOPE SYNC 
2$: TSTB (R2) : TEST THE TSTB 

BM] 4$ ;BR IF 'N'' SET = IT SHOULD BE 
3$: HALT ;TSTB FAILED TO SET ‘N’’ 

BR 1$ :LOCK ON HARD ERROR 
4$: CMP R4,(R2) ;DID TSTB DISTURB CDEST) 

BEQ TST4O ;;BR IF NOT 
5$: HALT . ;TSTB ALTERED CDESTJ 

MOV R4, (R2) RESTORE CDESTJ 

1$ sLOCK ON rts EROR 
° [HERR ER ARERR REESE ERE ER ER EAERERE ERE RERRRERER ARERR RARER EE 
S*eTEST 40 BASIS ‘‘TSTB (R)'' TEST = ODD ADDRESS 

POUTTTTITIITTTIITILITITITITITITITITTTITITTTIT ITI TTT TTT TTT tt Titi te 
TST40: 


SEQ 0049 | 
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140 “"TSTB (R)'' TEST = ODD ADDRESS 


MOV #40,R0 ;;LOAD RO WITH TEST NUMBER 
MOV ADWIB+6,R2 DEST ADDR = DWIB+6 
MOV #177401,R4 RESULT S / B = 177401 
MOV #DWIB+7,R3 DEST ADDR USED = DWTB+7 
1$: ccc SCOPE SYNC 
2$: TSTB (R3) ;TEST THE TSTB 
BM! 4$ ;BR IF 'N’' SET = IT SHOULD BE 
3$: HALT ;TSTB FAILED TO SET ‘N"’ 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP R4, (R2) ;DID TSTB DISTURB CDESTI 
BEQ TST41 ;3BR IF NOT 
5$: HAL T ;TSTB ALTERED CDESTI 
MOV R4,(R2) SRESTORE CDESTJ 
BR 1$ ;LOCK ON HARD EROR 


5S ape: ghee i cual ariipntipiginy~ aaa aematlt pani aaltepet iad tt tahini 


S*TEST 41 BASIC ''TSTB @4A"' TEST = EVEN ADDRESS 


° . eeeeneereerenearesnnennnnenaneneneneneneeeeanagngaenenanenanens 


T5141: 
MOV #41,RO ;LOAD RO WITH TEST NUMBER 
MOV MDWTA+4 ,R2 “DEST ADDR = DWTA+4 
MOV #177400,R4 RESULT S / B = 177400 
1$: CCC :SCOPE SYNC 
23: TSTB @ADWTA+4 ;TEST THE TSTB 
BEQ 4$ 3BR IF *'2'* SET = IT SHOULD BE 
3$: HALT ;TSTB FAILED TO SET ‘'2"' 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP R4, (R2) ;DID TSTB DISTURB CDESTJ? 
BEQ TST42 :;BR IF NOT 
5$: HALT ;TSTB ALTERED CDESTJ 
MOV R4,(R2) RESTORE CDESTJ 
BR 1$ ;LOCK ON HARD ERROR 
DLR EERE REE EERE EEE REAR ERERE EERE EEEREKREER EEE 
i*TEST 42 BASIC ''TSTB @4A"’ TEST - ODD ADDRESS 


SL AAA AAR AREER EERE AREER AEEKEERARERAEKAEREAERAEEERERER EE EH 


TST42: 


MOV #42 ,RO 3zLOAD RO WITH TEST NUMBER 
MOV aDUTArG, R2 DEST ADDR = DWTA+6 
MOV #377 RESULT S / B = 377 
1$: ccc SCOPE SYNC 
2$: TSTB DADWTA+7 ;TEST THE TSTB 
BEQ 4$ ;BR IF ‘'2"* SET = IT SHOULD BE 


SEQ 0050 
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140 "TSTB aWA'' TEST = ODD ADDRESS 


3$: HALT ;TSTB FAILED TO SET *'2°° 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP R4, (R2) DID He A — CDESTI? 
BEQ TST43 : BR IF 
5$: HALT ;TSTB ALTERED CDESTJ 
MOV R4,(R2) RESTORE CDESTI 
BR 1$ ;LOCK ON HARD ERROR 
OOOO GIGI IOIOIIUIUIDIUIOIOINIOIDIDIDIIDIOIDIOIDIOIOIOIOIOIOIUIOININE OID IOI IIIS II III 
*TEST 43 BASIC *DECB 1(SP)"' 


CLEARER EERRKEEEER EE 


TST43: 


MOV #43,R0 ;zLOAD_RO WITH TEST NUMBER 
MOV SP,R5 AVE SP 
MOV #177600,R4 RESULT S / B = 177400 
1$: MOV R5,SP 
CLR -(SP) :CDESTI = = 9200000 
CCC *SCOPE S$ 
2$: DECB. ~—-:-1( SP) :TEST THE DECB 
CMP R4, (SP) sRESULT = 177400? 
BEQ 4$ “BR IF YES 
3$: HALT ZERROR - DECB FAILED 
. BR 1$ ‘LOCK ON HARD ERROR 
4$: MOV R5,SP :RESET THE SP 
DLA EH 
T*TEST 44 BASIC 'MOV a#A,R'' TEST 
FFARR REREAD 
T5144 
MOV #44,R0 -LOAD RO WITH TEST NUMBER 
1$: CLR R3 :tDEsT3 = = 900000 
CCC * SCOPE 
2$: MOV QHATA,R3 :TEST THE MOV 
CMP #DWTA,F 3 RESULT = DWTA? 
BEQ TST45 ::BR IF YES 
3$: HALT :MOV FAILED TO DELIVER CORRECT RESULT 
BR 1$ *LOCK ON HARD ERROR 
DRE REE EEE EEE REE EERE REE EERE ERRREERERRR REE 
S*eTEST 45 BASIC ‘MOV #N,X(R)** TEST 
DD AAA ERE 
TST45: 
MOV #45,R0 LOAD RO Quit TEST NUMBER 
MOV AMBUF 0+2,R2 “BEST A = MBUF0+2 
MOV #125252,R4 RESULT an / B = 125252 
1$: MOV AMBUFO.R3 :(R3] = BASE DEST ADDR 


CLR (R2) :EDESTI = 000000 


SEQ 0051 
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SCOPE SYNC 
#125252,2(R3) ;TEST THE MOV 


CMP R4,(R2) RESULT OK? 
BEQ TST46 ;;BR IF YES 


3$: HALT ;MOV DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 


TRAE O EIS UISISIUISIOISIOIIIUISIUIOIUIUIIOISIIIUIUIUISIOIOIUIOIUIOIIOIIDIDIIDIUIIIIDIUIOIIDIODE # 
i*TEST 46 BASIC ‘MOV #N,(R)'' TEST 
TES IESE IES IOIIOIIOIIOIUIIIOIIIOIDIUIIDIOIDIOIIOIUIDIOIIDIUIDIDIDIDIUIUIDIDIOBIO IDOI I 
TST46: 

;zLOAD RO WITH TEST NUMBER 

;DEST ADDR = MBUFO 

RESULT S / B = 125252 
1$: (R3) hy tie 00000 

SCOPE SYNC 


2$: #125252, (R3) ;TEST THE MOV 


R4,(R3) RESULT OK? 
TST47 ;3BR IF YES 


3$: ;MOV DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 


Sta hekahat hahah ehahehehahelcheleialelelahclelelalsiaielshaielelaielaheisiahsisiateieioheioleieisieieicieieicheieinieieieheiolel 


s*TEST 47 BASIC ‘MOV (RA)+,RB'’ TEST 


SD IR EIR REE ERE ERE REE ERR RER ERE ERE ER 


TST47: 
MO 447 ,RO FN RO WITH TEST NUMBER 
1$: #ATA,RS SRC ADD ATA 
R3 : (DEST = 900000 
* SCOPE E SYN 


2$: (R5)+,R3 i; TEST THE MOV 


MDWTA,R3 RESULT OK? 
4$ :BR IF YES 


3$: ;MOV DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 


4$: CMP MATA+2,R5 ;DID SRC REG GET INCREMENTED? 
BEQ TST5O :;BR IF YES 


5$: HALT :MOV FAILED TO UPDATE SRC. REG. 
BR 1$ ;LOCK ON HARD ERROR 


SLUR ERE EERE AER AE EERE AERARER RAE RAER ARATE RAE A EES 


i*TEST 50 BASIC ‘MOV @4#A,a48"' 


SLUR AAA EAE EAR AAA EAE EER AEA ERA ERA RARAERARAERTR EERE ES 
TST50: 
MOV #50,R0 z7LOAD RO WITH TEST NUMBER 


SEQ 0052 
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150 BASIC "MOV @#A,aA6"' 


MOV AMBUF 1, R2 :DEST ADDR = MBUFI 
MOV ADWTA,RG SRESULT S / B = #DWIA 
1$: CLR (R2) “MAKE CDEST] = 000000 
CCC : SCOPE SYNC 
2s: MOV aeATA,aAMBUFT =: TEST THE MOV 
CMP RG, (R2) ‘DID RESULT = #DWTA ? 
BEQ TST51 ‘:BR IF YES 
3: HALT :MOV DELIVERED THE WRONG RESULT 
BR 1$ =LOCK ON HARD ERROR 
SL ATAAAAAAAAAAAARRAARARRARRERAARRERARARARERERAERAARARARERRERERAAREES 
TeTEST 51 BASIC ‘MOY X(R),PC’’ TEST 


SP RAAARARAARARAAAARARRAAARARRARAAAARAAERRARAAAAKRAAEHRARAERRRRREREE 


T5151: 


MOV #51,R0 “LOAD RO WITH TEST NUMBER 
1$: MOV #2$_R5 “ER5) = “<3. (BASE ADDRESS) 

CCC :SCOPE S 
2$: MOV 4$-2$(R5) ,PC :TEST THE MOV - GO TO NEXT TEST VIA 4$ 
3$: HALT :MOV FAILED TO LOAD THE PC 

BR 1$ ‘LOCK ON HARD ERROR 
4$: +2 :POINTER TO NEXT TEST 
SL AARAAARAA AAA RRARAERERARERRRAARERAAAEREAERAEEAEERAEEAEREPRARRERERE 
T*TEST 52 BASIC ‘MOV a#A,(R)"' TEST 
CLARA AERA RRAERRE RARE ERE RAEREREERERER AERA ERRARARAEAREERERE REE 
TST52: 

MOV #52,RO ::LOAD RO WITH TEST NUMBER 

MOV #DWTA,RS *RESULT § / B = ADWTA 

MOV AMBUFO,R2 “DEST ADDR = MBUFO 
1$: CLR (R2) “MAKE CDESTJ=000000 

CCC *SCOPE SYNC - Z=0 
2$: MOV QWATA, (R2) sTEST THE MOV 

CMP R4, (R2) :DID RESULT = #DWTA ?? 

BEQ TST53 :,BR IF YES 
3$: HALT MOV DELIVERED WRONG RESULT 

BR 1$ LOCK ON HARD ERROR 
SL AAAARAA ARERR REA KKAERERAAERAARARRAAERRAARAAERAAERAAAERARRERR EEE 
S*TEST 53 BASIC ‘MOV X(RA),RB'' TEST 
CTA REAR ERE RRR EERE REAR EERERAAEAEERAEREE RENEE 
TST53: 

MOV #53,RO >:L OAD RO WITH TEST NUMBER 

MOV HATA,RS *ER5] = BASE ADDR FOR SOURCE (ATA) 
1$: CLR R3 [MAKE [DEST] = 000000 

CCC *SCOPE SYNC 
2$: MOV 4(R5) RB : TEST THE MOV 


SEQ 0053 
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153 "MOV x (RA),RB'' TEST 


CMP #DBTA,R3 ;RESULT = #DBTA ?? 

BEQ TST54 ;;BR IF YES 
3$: HALT :MOV DELIVERED WRONG RESULT 

BR 1$ ;LOCK ON HARD ERROR 
pL Ree RRR E EERE EERE EERE REE EEE EEE EERE EERE RRR ATT 
s*TEST 54 BASIC ‘MOV RA,-(RB)'' TEST 


S RARER ERTARAARARAAERAARERERERRERRERERRERAEEERRARARRARAERORR ERR OD 


1S154: 


MOV #54,RO ::LOAD RO WITH TEST NUMBER 
MOV #MBUFO,R2 ‘FINAL DEST ADDR = MBUFO 
MOV #125252,R4 ‘RESULT S$ / B = 125252 
1$: MOV #MBUF 0+2,R5 ‘INITIAL DEST ADDR = TEMP2 + 2 
CLR (R2) “MAKE [DEST] = 000000 
CCC >SCOPE SYNC 
2$: MOV R4,-(R5) :TEST THE MOV 
CMP R4, (R2) :RESULT = 125252 
BEO 4$ “BR IF YES 
3$: HALT ;MOV DELIVERED THE WRONG ESULT 
BR 1$ LOCK ON HARD ERROR 
4$: CMP R2,R5 :DID REGISTER GET DECREMENTED ? 
BEQ TST55 ::BR IF YES 
S$: HALT :MOV FAILED TO UPDATE REGISTER 
BR 1$ “LOCK ON HARD ERR 
LL RE RRA RARER REAR REE EREREERERREERERERERERERERRERR ERE EE 
S*TEST 55 BASIC ‘MOV a@#A,-(R)'' TEST 


LAER AREA EARAEEERRER RRR RE REREE RARER EREEREREERAERERERERAR ERAS 
TSTSS: 


MOV #55 RO ;LOAD RO WITH Bh Peas 


MOV MDWTA,RS SRESULT S / 8 
MOV AMBUF 0 ,R2 ;DEST ADDR = MBUFO 

1$: MOv AMBUF +2 ,R5 F od he DEST ADDR = MBUFO+2 
CLR (R2) E CDESTJ = 000000 
CCC ‘SCOPE SYNC 

e$: MOV @4ATA,-(R5) ; TEST THE MOV 
CMP R4,(R2) ~ ee ae 
BEG 4$ :BR IF 

3$: HALT :MOV DELIVERED THE WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 

4$: CMP R5,Re ;DID DEST REG GET DECREMENTED ?? 
BEQ TSTS6 :38R IF YES 

S$: HAL T sMOV FAILED TO UPDATE REGISTER 
BR 1$ ;LOCK ON HARD ERROR 


ee OL iit 


SEQ 0054 
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CQKDAE .P11 17=SEP=79 09:47 156 BASIC ‘MOV (R),@#A'’ TES SEQ 0055 

2836 LL RRA ERAT A TREE REEREATEREEARARRER EERE EERE TERE RRR EEE 

2837 S*TEST 56 BASIC ‘MOV (R),a@MA'’ TEST 

2838 LEAR ARERR RAE AERA ERE R EERE EERE RRR RE RR ERE REA Ree 

2839 005754 TSTS6: 

2840 005754 012700 000056 MOV #56,R0 ;LOAD RO WITH TEST NUMBER 

2841 005760 012702 063316 MOV AMBUF 0 ,R2 “BEST ADDR = MBUFO 

2842 005764 012704 063326 MOV #DWTA,RS RESULT S / B = #DWTA 

2843 005770 012705 063302 MOV MATA,RS —_— ADDR = ATA 

2844 005774 005012 1$: CLR (R2) Sa ane a = 000000 | 

oF 005776 000257 ccc ‘SCO OPE ¢ 

944 006000 011537 063316 es: MOV (R5) , AAMBUF O ;TEST THE MOV 

2849 006004 020412 CMP R4, (R2) sRESULT = #DWTA ?? 

soot 006006 001402 BEQ TST57 ;;BR IF YES 

2852 006010 000000 3$: HALT sMOV DELIVERED THE WRONG RESULT 

coer 006012 000770 BR 1$ ;LOCK ON HARD ERROR 

2855 Sindhi led 

2856 StTEST 57 BASIC 'MOV -(R),@MA"' TEST 

2857 : ee RHRERHERRERRERRERERARERRRERREREERERER ERR ERROR ARERR EERE ERE 

2858 006014 TS157: 

2859 006014 012700 000057 MOV #57,R0 ;LOAD RO WITH TEST NUMBER 

2860 006020 012702 063316 MOV AMBUF O,R2 “BEST ADDR = MBUFO 

2861 006024 012704 063326 MOV #DWTA,RS ;RESULT S / B = MDWTA 

2862 006030 012705 063304 1$: MOV #ATA+2,RS INITIAL SOURCE ADDR = ATA+? 

2863 006034 005012 CLR (R2) sMAKE CDESTJ = 000000 

ag: 006036 000257 CCC ;SCOPE SYNC 

cae 006040 014537 063316 2$: MOV -(R5) ,a4MBUFO ;TEST THE MOV 

2868 006044 020412 C R4,(R2) ;RESULT = #DWTA ? 

444 006046 001402 BEQ 4$ Sn IF 2S 

2871 006050 000000 3$: HALT sMOV DELIVERED THE WRONG RESULT 

ore 006052 000766 BR 1$ ;LOCK ON HARD ERROR 

2874 006054 022705 063302 4$: CMP #ATA,RS ;DID THE SRC REG GET DECREMENTED ? 

leg 006060 001402 BEQ TST60 ;7BR IF YES 

c 

2877 006062 000000 5$: HAL T ;MOV FAILED TO UPDATE SOURCE REG 

2878 006064 000761 BR 1$ ;LOCK ON HARD ERROR 

2879 LLU RRR EERE EERE REE ARERR EERE R ERR RENEE RR EEE 
S*TEST 60 BASIC ‘MOV (RA) ,RB'* TEST 

2881 LARA REE EERE EERE REE ERE ERE REE REET RR E e 

2882 006066 TST60: 

2883 006066 012700 000060 MOV #60,RO ;,LOAD RO WITH TEST NUMBER 

2884 006072 012705 063302 1$: MOV MATA,RS ; INITIAL SOURCE ADDR = ATA 

2885 006076 005003 CLR R3 sMAKE CDEST) = 000000 

ny 006100 000257 CCC ; SCOPE SYNC 

ood 006102 012503 23: MOV (R5)+,R3 . : TEST THE MOV 

2890 006104 022703 063326 CMP #DWIA,R3 sRESULT = #DWTA ? 

2891 006110 001402 BEQ 4% ;BR IF YES 
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"MOV (RA) , RB" 
3$: HALT 7MOV DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP ea RS ;DID SOURCE REG GET INCREMENTED 
BEQ TST6 ; ;BR IF YES 
5$: HALT ;MOV FAILED TO UPDATE SOURCE REGISTER 
BR i$ ;LOCK ON HARD ERROR 
FIP dadadahadobotalatalalatelabahebahoietabalebatalabetelelphelpielabetehdaletebshelbalaleialabialeiaiaibeleliaiehisieiela 
s*TEST 61 BASIC ‘MOV X‘RA),RB"' TEST 
DETTTITITI TITTLE TLL LE LLL TELE LLL LLL 
TST61: 
MOV #61,R0 32LOAD RO WITH TEST NUMBER 
MOV #ATA,RS ;BASE SOURCE ADDR = ATA 
1$: CLR R3 MAKE CDESTJ = 000000 
ccc ;SCOPE SYNC 
2$: MOV 2(R5) ,R3 ;TEST THE MOV 
CMP #DWTB,RS3 ZRESULT = #DWTB ? 
BEQ TST62 ;7BR IF YES 
3$: HALT 7MOV FAILED TO = A a CORRECT RESULT 
BR 1$ ;LOCK ON HARD ERRO 
PRETEEN OR 0 Rae Ren hone 
*TEST 62 BASIC ‘MOV @X(RA),RB’' TEST 


SP RRA RARER ARERR ERE REAR ERE ERE REE EREERERERERR ERE RRR ETR REE 


TST62: 


MOV #62,R -LOAD RO WITH TEST NUMBER 
MOV cotaad, aMMBUF 0+2" 7SET UP ADDRESS TABLE MBUFO 
MOV #MBUF 0.5 :BASE ADDRESS IN RS 

1$: CLR R3 — [DEST] = 000000 
CCC SCOPE SYNC 

2$: MOV @2(R5) ,R3 :TEST THE MOV 
CMP #-1,R3 sRESULT = 177777 
BEQ TST63 +:BR IF YES 

3$: HALT :MOV DELIVERED THE WRONG RESULT 
BR 1$ ‘LOCK ON HARD ERROR 


SL AAA R RARER RARER EKER ERAER EERE AERA ERE 


S*TEST 63 BASIC ‘MOV (R)+,X(R)'' TEST 


- LAR RRR SRRER REESE SE ESSER RR RRR SRSA SRR RRR ERR RRR SARA RR ARRAS RRR ARES 


TST63: 


MOV ::LOAD RO WITH TEST NUMBER 
MOV #428350 RG “RESULT S / B = 125252 
MOV AMBUF 14+2,R2 ‘FINAL DEST ADDR = MBUF1+2 
MOV R4, AAMBUF 0 ‘SOURCE OPERAND = 125252 

1$: MOV AMBUFO,R5 *(R5] = INITIAL SRC ADDR = MBUFO 
CLR (R2) “MAKE [DEST] = 000000 
CCC *SCOPE SYNC 


SEQ 0056 


5 
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CQKDAE .P11 17=SEP=79 09:47 163 "MOV (R)*,K(R)'' T SEQ 0057 
ey: 006252 012565 009004 2$: MOV (R5)+,4(R5) ; TEST THE MOV 
2950 006256 020412 CMP R4, (RP) sRESULT = 125252 ? 
$32) 006260 001402 BEQ 4$ ;BR IF YES 
2953 006262 000000 3$: HALT :MOV DELIVERED WRONG RESULT 
Seed 006264 000766 BR 1$ ;LOCK ON HARD ERROR 
2956 006266 022705 063320 4$: CMP MMBUF +2, RS ;DID REGISTER GET INCREMENTED ? 
3434 006272 001402 BEQ TST ;;BR IF YES 
2959 "006274 000000 S$: HALT MOV FAILED TO UPDATE REGISTER 
soot 006276 000761 BR 1$ ;LOCK ON HARD ERROR 
2962 DOO IISIOIDISIIIIOIOIOISIUIDIUIUIIOIIOIUIOIOIUIDIUIDIUIOIUIDIIDIOIDIDIOIOIOIOIIOIDIDIDIDIUIOIIOIDIIOIIONE & 
2963 S*TEST 64 BASIC ''CMP R,@AA'’ TEST WITH CR) = [AJ 
2964 DDO IIIS IOIUIIUIOIIIIDIIOIOIOIOIOIOIUIOIDIUIDIOIUIDIDIUIDIDIDIDIOIIDIDIDIDIDIDIDIDIDIDIOR IO I i intitlt 
2965 006300 TST64: 
2966 006300 012700 000064 MOV #64 ,RO LOAD RO WITH TEST NUMBER 
2967 .SBITTL USER CONTROLLED BREAKPOINT’ -- BIT1 
2968 006304 032737 000002 063240 BIT #B1T1,34BPTLOC ;BREAKPOINT HALT SET ?? 
2969 006312 001401 BEQ .+4 ‘BR IF NOT 
2970 006314 000000 HAL [ ;BREAK - DEPRESS CONTINUE TO RESTART 
2971 006316 012702 063316 MOV AMBUFO,R2 ;DEST ADDR = MBUFO 
2972 006322 012704 125252 MOV #125252,R4 sRESULT S / B = 125252 
2973 006326 010405 1$: MOV R4,R5 ;CR5J = SOURCE OP = 125252 
2974 006330 010412 MOV R4,(R2) sMAKE [DEST] = 125252 
on 006332 000257 ccc ;SCOPE SYNC 
3444 006334 020537 063316 2$: CMP RS, @AMBUF 0 ;TEST THE CMP 
4a 006340 001402 BEQ 4$ ;BR IF ‘'7'' WAS SET =~ IT SHOULD BE 
2981 006342 000000 3s: HALT :CMP FAILED TO SET ‘72"' 
sone 006344 000770 BR 1$ ;LOCK ON HARD ERROR 
2984 006346 020412 4$: CMP R4,(R2) 31S RESULT STILL = 125252 ? 
aed 006350 001402 BEQ TST65 7:BR IF YES 
2987 006352 000000 S$: HALT :CMP ALTERED [DEST] 
Sone 006354 000764 BR 1$ LOCK ON HARD ERROR 
2990 DIO IOI IUISIIOIUIOIOIIUIDIUIOIUIOOIUIIIOIUIDIIDIUUIUIOOIOIIUI tnt ttn tit 
2991 *TEST 65 BASIC "CMP R,a#A'’ WITH [RJ NOT EQUAL TO [A] 
2992 DOS IIOIIIUIOIOIIUIIIUIIUIOIUIDIUIDIOIDIDIOIOIIOIOIIOIUIUIOIIOIIUIDIIOIIOIOIUIDIOIUIDIIO IDOE: ttt 
2993 006356 TST65: 
2994 006356 012700 000065 MOV #65,R0 ;LOAD RO WITH TEST NUMBER 
2995 006362 012702 063316 MOV AMBUFO,R2 “BEST ADDR = MBUFO . 
006 012704 125252 MOV #125252,R4 :MAKE RESULT S / B = 125252 
2997 006372 005005 1$: CLR R5 ;CR5J] = SOURCE OP = 000000 
2998 006374 010412 MOV R4, (R2) sMAKE CDEST] = 125252 
2999 006376 000277 scc ;SCOPE SYNC - MAKE Z=1 
ore 006400 020537 063316 e$: CMP R5, dAMBUF 0 ; TEST THE CMP 


3003 006404 001002 BNE TST66 37BR IF 2=0 - IT SHOULD BE 








G 5 2, ot en ot nn ere 
CQKDA=E KD11=K BASIC LOGIC TESTS MACY11 30A(1052) 17=SEP=79 09:55 PAGE 59 
CQKDAE .P11 17=SEP=79 09:47 T65 BASIC ‘‘CMP R,a@AA'’ WITH [RJ] NOT EQUAL TO [A] SEQ 0058 
3004 
3005 006406 000000 %$: HALT 7 CMP FAILED TO CLEAR ‘7°’ 
soe 006410 000770 BR 1$ ;LOCK ON HARD ERROR 
3008 5 AERA REARR RARER EERE EEE EERE EERERRREEERRRERARE REAR EEE TERED 
3009 T*TEST 66 BASIC ‘BIS #N,aaA'' TEST = N=177777,[A]=000000 
3010 LEAMA AARAARAAAERRAAAARARRAARERRRARERRARAAAAEARERRARARARRRERARARH EEE 
3011 006412 TST66: 
3012 006412 012700 000066 MOV #66 ,R0 ;;LOAD RO WITH TEST NUMBER 
3013 006416 012702 063316 MOV AMBUFO,R2 ;DEST ADDR = MBUFO 
3014 006422 012704 177777 MOV #-1,R4 sRESULT S / B = 177777 
3015 006426 005012 1$: CLR (R2) ;C(DESTJ = 000000 
Hat 006430 000257 CCC ;SCOPE SYNC 
ahd 006432 052737 177777 063316 2$: BIS #-1 , AAMBUF 0 ;TEST THE BIS 
3020 006440 020412 CMP R4,(R2) ;RESULT OK? 
aS) 006442 007402 BEQ TST67 7 BR IF YES 
3023 006444 000000 3$: HALT ;BIS FAILED TO SET ALL BITS IN BITFLG 
Ss 006446 000767 BR 1$ ;LOCK ON HARD ERROR 
3026 FF Sabaabedlpdhadachadadbadadndnhahnietaiahebnipiababnbababndelpbpaeininioiaiaialininbahsiniainiabainieininisininiaheiaiele 
3027 s*TEST 67 BASIC ‘BIC #N,a4A"’ TEST 
3028 RRR RRR ERR REET REE REE REREREREERERERE EKER EE 
3029 006450 TST67: 
3030 006450 012700 000067 MOV #67,R0 ; LOAD RO WITH TEST NUMBER 
3031 006454 012702 063316 MOV AMBUFO,R2 DEST ey = — 
3032 006460 012704 000077 MOV #77 ,R4 SRESLLT S # 77 
3033 006464 012712 177777 1$: MOV 4-1, (R2) 7MAKE tpesti= “177777 
ete 006470 000257 CCl ;SCOPE SYNC 
td 006472 042737 177700 063316 2$: BIC #177700, a4MBUFO ; TEST THE BIC | 
3038 006500 020412 CMP R4, (R2) :DID RESULT = 77 ? 
2, 006502 001402 BEQ TST70 ::BR IF YES 
3041 006504 000000 3$: HAL T ae DELIVERED hae * eane: RESULT | 
sek 006506 000766 BR 1$ LOCK ON HARD ERR 
3044 OOO IIIIOIIIIOIIIDIDIOIIUIOIIIIUIOIIDIOIIUIDIOIOIOIIUOIIUUIOIIDIOIUIUIIDIIDIOIOIIDIDE IDO tt 
3045 seTEST 70 BASIC ‘BIC #N,R"' TEST 
2046 DRO IIDIIIUIIOIUIUIIDIDIOUIOIU IOI UII ORR TR RR Ekin 
3047 006510 TST70: 
3048 006510 012700 000070 MOV #70,R0 :zLOAD RO WITH TEST NUMBER 
3049 006514 005003 1$: CLR R3 sCDESTJ = 177777 
3050 006516 005103 COM R$ 
as 006520 000257 ccc ;SCOPE SYNC 
haz 006522 042703 177400 23: BIC #177400,R3 ZTEST THE BIC 
3055 006526 022703 000377 CMP #377,R3 ZRESULT OK? 
s29 006532 001402 BEQ TST71 77BR IF YES 
3058 006534 000000 $$: HAI_T sBiC FAILED TO CLEAR HI] -BYTE 


3059 006536 000766 BR 1$ :LOCK ON HARD ERROR 





or 
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CQKDA=E KD11=K BASIC LOGIC TE 
CQKDAE .P11 17=SEP=79 09:47 T70 BASIC ‘BIC #N,R’’ TES SEQ 0059 

3061 PLR ERA EKER EAA A RETREAT REEREERE REE E Ree TRA AAA 

3062 seTEST 71 BASIC ‘BIC #N,2(SP)*' TEST 

3063 LL RRAAERAE RAAT EERE E ERE EERE ETRE ERR ER EERE ER EERE REE R REAR E ARO eS 

3064 006540 TST71: 

3065 006540 012700 9000071 MOV #71,R0 ;LOAD RO WITH TEST NUMBER 

3066 006544 0127046 000357 MOV #357 RG “RESULT S 7 B = 357 

3067 006550 010605 MOV SP,R5 SAVE SP 

3068 006552 010506 1$: MOV R5,SP RESET SP FOR ERROR LOOP 

3069 006554 012746 000377 MGV #377,-(SP) ‘(DEST] = 377 PUT ON STACK 

3070 006560 005746 TST - (SP) “DECREMENT SP 

al 006562 000257 CCC :SCOPE SYNC 

ey 006564 042766 000020 000002 2$: BIC #20,2°(SP) sTEST THE BIC = CLEAR BIT 4 

3075 006572 010602 MOV SP,R2 :[R2] = DEST ADDR 

3076 006574 005722 TST (R2)+ 

3077 006576 020412 CMP R4,(R2) SRESULT = 357? 

=r 006600 001402 BEQ 4$ ;BR IF YES 

3080 006602 000000 3$: HALT :BIC FAILED TO CLR BIT2 OF DEST 

ao 006604 000762 BR 1$ ;LOCK ON HARD ERROR 

3083 006606 010506 4$: MOV R5,SP 

3085 TD DOIOIIUIDIUIIIIIOIIOIUIUIOIUIIUIUIOIOIIOIOIDIOIUIUIDIOIUIDIUIOIUIDIUIUIOIUIDIOIUIIDIDID ICID Git ttt 

i*TEST 72 BASIC '‘ADD #N,RN ‘’ TEST 

3087 DOO IIIOIIUIUIIOIUIOIUIIUIIUIOIDIUIIOOIOIUIOIUIOIUIOIIUIOIUIDIIOIUIUIDIIOIODIIDOI Dn ttt t 
006610 TST72: 

3089 006610 912700 000072 MOV #72,R0 3; LOAD RO WITH TEST NUMBER 

3090 006614 012703 000002 1$: MOV #2,R3 sMAKE CDEST] = 2 

a4 006620 000257 ccc ;SCOPE SYNC 

3093 006622 062703 000002 2$: ADD #2,R3 s TEST THE ADD 

3095 006626 022703 000004 CMP #4 ,R3 es =4? 

abe 006632 001402 BEQ TST73 BR IF YES 

3098 006634 000000 3$: HALT ae DELIVERED THE WRONG RESULT 

oo 006636 000766 BR 1$ LOCK ON HARD ERROR 

3101 DUO IO III IOI IOISUIOIIOIIUIOUIOUUISUIUIUIOIUOIUIUIDIUIUIUIUIDIIOIUIOU IO On tnt 

3102 SeTEST 73 BASIC ''ADD #N,(R) '* TEST 

3103 LL UR ARERR EERE EERE E RE REET ERE ee 

3104 006640 TS173: 

3105 006640 012700 000073 MOV #73,R0 :7;LOAD RO WITH TEST NUMBER 

3106 006644 012702 063316 MOV AMBUFO,R2 ;DEST ADDR = MBUFO 

3107 006650 012704 000004 MOV #4 RS sRESULT S / B= 4 

3108 006654 012712 000002 1$: MOV #2, (R2) iMAKE CREST] = 2 

4 006660 000257 cc ;SCOPE SYNC 

Si3 006662 062712 000002 23: ADD #2,(R2) ;TEST THE ADD 

3113 006666 020412 CMP R4, (R2) RESULT = 4 ? 

gis 006670 001402 BEQ TST74 + BR IF YES 













WIN. NWWNWANWANNWNWINWAAWNA 
ed od nd 9 a od + 2 8) et 
OWDWNAWERWN—O 0M NO 


POS —t a aad 
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000000 
000767 


122726 
001402 


000000 
000770 


020506 
001462 


000000 
000764 


020412 
001402 


000000 
000760 





Ic TES 
09:47 


000074 
000002 
063320 
063316 


000002 


000075 
177400 


000000 


000002 


me meh 
173 


: 
tt, Fe: : PAGE 61 
BASIC "'ADD #N,(R) ' 


3$: HALT ZADD DELIVERED THE WRONG RESULT 
BR 1$ “LOCK ON HARD ERROR 
J J AARARARARARAAAAARARRARAARARARARRARARARAARAARRARRARRARRAARERERERE 
T*TEST 74 BASIC "ADD #N,X(R)'' TEST 
Ff TAAAARAAAARARARAARAARARKRAARARAAARRARRRARRARRARAARARARAAAARARAARRER 
TST74: 
MOV #74,RO ::LOAD RO WITH TEST NUMBER 
MOV #2,R4 “RESULT S / B = 2 
MOV #MBUF 0+2,R2 DEST ADDR = MBUFO + 2 
1$: MOV AMBUFO.R5 “BASE DEST ADDR = MBUFO 
CLR (R2) “MAKE [DEST] = 000000 
CCL =SCOPE SYNC 
23: ADD #2,2(R5) :TEST THE ADD 
CMP R4, (R2) :RESULT = 2 ? 
BEQ TS175 *:BR IF YES 
3$: HALT :ADD DELIVERED THE WRONG RESULT 
BR 1$ “LOOP ON HARD ERROR 
en ee 
T*TEST 75 BASIC ''CMPB #N,(SP)+'' TEST 


WER ARE REARS E RRR RR RER SERA RRR SARA RRR RARER RAR RRR RRR RAR RRR RRR S DD DO! 


1S175: 


MOV #75,RO ::LOAD RO WITH TEST NUMBER 
MOV 079000. Ré “RESULT S / B = 177400 
MCV SP.R5 “SAVE SP 
MOV SP,R2 :SET UP DEST ADDR 
TST =(R2) *R2 CONTAINS DEST ADDR 
1$ MOV R5,SP “RESET SP FOR ERROR LOOP 
MOV R4.=(SP) “MAKE CDEST] = 17740 
CCC “SCOPE SYNC - ‘'2'' = 
2$ CMPB—s-: #0, (SP) + : TEST THE CMPB 
BEQ 4$ :BR IF ''7'' SET = IT SHOULD BE 
3g HALT :CMPB FAILED TO SET ‘'2"' 
BR 1$ ‘LOCK ON HARD ERROR 
4$ CMP R5,SP :DID SP GET UPDATED BY 2? 
BEQ 6$ “BR IF YES 
S$ HALT :CMPB FAILED TO UPDATE SP PROPERLY 
BR 1$ =LOCK ON HARD ERROR 
6$ CMP R4, (R2) :CDEST ALTERED? 
REQ TST76 :;BR IF NOT 
7$ HALT :CMPB MODIFIED CDESTJ 
BR 1$ “LOCK ON HARD ERROR. 
PETES US IST I TT eee eee ee tet TTT iii i iti iii t titi iii itt iti t titi i iis 
S*eTEST 76 BASIC ''CMPB (RA)+,(RB)+'' = SRC AND DEST EVEN 






CQKDA-E KD11=-k BAS] 
CQKDAE .P11 17=SEP= 





2188 022703 
001402 


000000 
000763 


022705 
3195 007070 001402 


3197 007072 000000 
3198 007074 000756 


3200 007076 020412 
3201 007100 001403 






000000 
3204 007104 010412 
eSn2 007106 000751 


3216 007134 

3217 

3218 007136 122523 
3219 

3220 007140 001402 
3221 

3222 007142 000000 
3223 7144 000767 
3224 


3225 007146 022703 
001402 





| whe 
3 
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176 BASIC *'CMPB (RA)+,(RB)+'' = SRC AND DEST EVEN SEQ 0061 


WAR RRRSRRRRRRRRSRSARSARRRRRRSR RRR REE RA RELA RASA RRR RAR RRS RAR RSS EDS 














S176: 
MOV #76,R0 ;LOAD RO WITH TEST te 
MOV #-1,R4 “RESULT S / B = 177777 
MOV #DWIA+2,R2 ;DEST ADDR = DuTAe? 
1$: MOV ADWTA+6,R5 SRC ADDR = DWTA+6 
MOV R2,R$ :R3 GETS DEST ADDR 
SCOPE SYNC 






2$: (R5)+,(R3)+ 


4¢ 


:TEST THE CMPB 
:BR IF ''2'' = 1 = IT SHOULD BE 


37CMPB FAILED TO SET ‘2’ 
;LOCK ON HARD ERROR 


:DID DEST REG GET UPDATED? 
;BR IF YES 

























3$: 
1$ 


ADWTA+3,R3 
6$ 













4$: 









5$: ;CMPB FAILED TO UPDATE DEST REG 


1$ ;LOCK ON HARD ERROR 
























063335 


000077 
177777 


063332 








6$: 





#DWTA+7,R5 :DID SRC _REG GET UPDATED? 
8$ :BR IF YES 


7$: HALT ;CMPB FAILED TO UPDATE SRC REG 
BR 1$ ;LOCK ON HARD ERROR 


8$: CMP R4,(R2) ;DID CDESTJ GET ALTERED? 
BEQ TST77 77BR IF NOT 
9S: HALT ;CMPB DELIVERED A RESULT 
MOV R4,(R2) sRESTORE CDESTJ 
BR 1$ ;LOCK ON HARD ERROR 
FUERA RRA REKREERRRERREERAEARAERAERARERRRARAAR ERY RREKKRHEHA REE 
s*TEST 77 BASIC ‘'CMPB (RA)+,(RB)+'’ = SRC AND DEST’ ODD 
fC FREER RARER REEEREREKREKHERERRRERERAERERAERARRERRARARRARERE ED 
TST77: 
MOV #77,RO ; LOAD RO WITH TEST NUMBER 
MOV #-1,R4 ;RESULT S / B = 177777 
MOV #DWIA+2,R2 :DEST ADDR = DWTA+2 
1%: MOV #DWTA+5,R5 ;SRC ADDR = DWTA+5 
MOV #DWTA+3,R3 3R3 GETS DEST ADDR+1 
CCC ;SCOPE SYNC 
2s: CMPB (R5)+,(R3)+ ZTEST THE CMPB 
BEQ 4$ ;BR IF ‘'27'' = 1 = IT SHOULD BE 
3$: HALT ;CMPB FAILED TO SET °‘7"* 
BR 1$ ;LOCK ON HARD ERROR 


4$: CMP #DWTA+4 ,R3 ;DID DEST REG GET UPDATED? 
E 6$ ;BR IF YES 


CQKDA-E KD11-K BASIC LOGIC TE 
17=SEP=79 09:47 


CQKDAE .P11 


007154 
007156 


007160 
007164 


000000 
000762 


022705 
001402 


000000 
000755 


020412 
001403 


000000 
010412 
000750 


012700 


122523 
001402 


000000 
000767 


022703 
001402 
000000 
000762 
022705 
001402 
000000 
000755 
020412 
001403 


000000 
010412 
000750 


STS 


063334 


063334 


063335 
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177 BASIC ""CMPB (RA)+,(R3)+'' = SRC AND DEST ODD 


5$: HALT ;CMPB FAILED TO UPDATE DEST REG 
BR 1$ *LOCK ON HARD ERROR 
6$: CMP ADWTA+6,RS ;DID SRC REG GET UPDATED? 
BEQ &$ ;BR IF YES 
7$: HALT ;CMPB FAILED TO A tiga SRC REG 
BR 1$ ;LOCK ON HARD ERR 
8$: CMP R4, (R2) ;DID ‘agp t GET ALTERED? 
BEQ TST100 + ;BR I 
9$: HALT ;CMPB DELIVERED A RESULT 
MOV R4,(R2) ;RESTORE CDESTJ 
BR 1$ ZLOCK ON HARD ERROR 
WEP ROSESASAESESLESSASASSSRASE SESS EASE SSE RE RE RASS RSS RR RRS RRR RASS ASS SS 
T*TEST 100 BASIC ''CMPB (RA)+,(RB)+'* = SRC / EVEN,DEST / ODD 
WEBRSS AAASAASALSASASLSLASSLASSE ES SESS RSS SASEASRARA SARA S SRSA SASS RA SASS SG 
1$T100: 
MOV #100.R0 ;LOAD RO WITH TEST NUMBER 
MOV #177400,R4 “RESULT S / B = 177400 
MOV #DWTA+4 ,R2 DEST ADDR = DwTA+4 
1$: MOV ADWTA+6,R5 SRC ADDR = DWTA+6 
MOV ADWTA+5,R3 3;R3 GETS DEST ADDR 
ccc ; SCOPE SYNC 
2s: CMPB (R5)+,(R3)+ ; TEST THE CMPB 
BEQ 4$ ;BR IF ''7'' = 1 = IT SHOULD BE 
3$: HALT ;CMPB FAILED TO SET ‘°'2"' 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP #DWTA+6,R3 :DID DEST REG GET UPDATED? 
BEQ 6$ ;BR IF YES 
5$: HALT ;CMPB FAILED TO UPDATE DEST REG 
BR 1$ ;LOCK ON HARD ERROR 
6$: CMP #DWTA+7,R5 ;DID SRC REG GET UPDATED? 
BEQ 8$ ;BR IF YES 
7$: HALT aoe FAILED TO UPDATE SRC REG 
BR 1$ LOCK ON HARD ERROR 
8$: CMP R4,(R2) ;DID CDEST] GET ALTERED? 
BEQ TST101 ;;BR IF NOT 
9$: HALT ;CMPB DELIVERED A RESULT 
MOV R4,(R2) SRESTORE (DEST) 
BR 1$ ;LOCK ON HARD ERROR 
DPE RRR EERE EERE REE EERE EERE KERR EERE EES 
s*TEST 101 BASIC ‘'CMPB (RA)+,(RB)+'' = SRC / ODD,DEST / EVEN 


SPREE AERA AERA AREER RER AERA EAAEREERKEARRAE ERE EKE 


SEQ 0062 
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CQKDAE .P11 17=SEP= 7101 BASIC ‘‘CMPB (RA)+,(RB)+'' = SRC / ODD,DEST / EVEN 


TST101: 
:7LOAD RO WITH TEST NUMBER 
4 ;RESULT S / B = 177777 
ADWIA+2, R2 :DEST ADDR = DwTA+2 
1$: ADWTA+5,R5 SRC ADDR = DWTA+5 
R2,R3 38 GETS DEST ADDR 
“SCOPE SYNC 


122523 2$: (R5)+,(R3)+ ;TEST THE CMPB 
001402 4$ ;BR IF ‘2°’ = 1 = IT SHOULD BE 


000000 3$: ;CMPB FAILED TO SET °°’ 
000770 BR 1$ ;LOCK ON HARD ERROR 


022703 4$: ADWTA+3,R3 ;DID DEST REG GET UPDATED? 
001402 6$ ;BR IF YES 


000000 5$: " |(MPB FAILED TO UPDATE DEST REG 
000763 BR 1$ ‘LOCK ON HARD ERR 


022705 6$: #DWTA+6,R5 :DID SRC_REG GET UPDATED? 
001402 8% ;BR IF YES 


000000 7$: ;CMPB FAILED TO UPDATE SRC REG 
000756 1$ ;LOCK ON HARD ERROR 


020412 8$: R4, (Re) ;DID CDEST] GET ALTERED? 
::;BR IF NOT 


001403 TST102 


000000 9$: ;CMPB DELIVERED A RESULT 
R4,(R2) SRESTORE CDESTI 
1$ ;LOCK ON HARD ERROR 


DLR REE ERE EERE EERE ERK EE 
S*TEST 102 BASIC ‘MOVB (RA)+,X(RB) - SRC EVEN / DEST EVEN 
JL ARR RR EEK EKEER EE EEERERERREEEEEREEREEEEEREEEREEEKEEEREEKEEEEKE 
TST102: 
#102,RO :LOAD RO WITH TEST NUMBER 
AMBUF 1,R2 Fl 
AMBUFO.R3 
#177400,R4 
064634 ; #DBTA,R 
177777 #~-1, (R2) 
* SCOPE me 
112563 000004 : (R5)+,4(R3) : TEST THE MOVB 
020412 R4, (R2) :RESULT OK? 
001402 4$ ‘BR IF YES 


000000 : :MOV DELIVERED WRONG RESULT 
000765 BR 1$ ;LOCK ON HARD ERROR 


022705 064635 : #DBTA+1,R5 ;DID SRC REG GET INCREMENTED BY +1 
001402 TST103 :;BR IF YES 
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I 
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000000 
Q00760 


112563 


020412 
001402 


000000 
000765 


022705 
001402 


000000 
000760 


112563 
020412 
001402 
000000 
000765 
022705 
001402 


000000 
000760 


064641 
177777 


000005 


064642 


177777 


000005 


064635 
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7102 BASIC "MOVB (RA)+,X(RB) = SRC EVEN / DEST EVEN 


5$: HALT :MOVB FAILED TO UPDATE SRC REG 
BR 1$ LOCK ON HARD ERROR 

, s aaeneaneneenenecqansneerengnnncersreqngnenecesantenneneesaees 

*TEST 103 BASIC *MOVB (RA)+,X(RB) = SRC ODD / DEST ODD 


Fy -RSRASAAAAARSALLAASLASESARASRSARASEARA RRA AARARE RR REAR AA RAR RARE ES! 


1$1103: 


“MOV #103,R0 ;LOAD RO WITH TEST NUMBER 
MOV AMBUF 1 ,R2 “BEST ADDR = MBUF 1 
MOV AMBUF 0 ,R3 TBASE DEST ADDR = MBUFO 
MOV #777 R&S ar he S§/B8= 777 
1$: MOV #DBTB+1,R5 DDR =_DBTB+1 
MOV #-1,(R2) PDESTa = 177777 
CCC :SCOPE SYNC 
2$: MOVB (R5)+,5(R3) ;TEST THE MOVB 
(MP R4, (R2) ;RESULT OK? 
BEQ 4$ ;BR IF YES 
3$: HALT “y+ DELIVERED WRONG RESULT 
BR 1$ LOCK ON HARD ERROR 
4$: CMP ADBTB+2,R5 :DID SRC REG GET INCREMENTED By +1 
BEQ TST104 7;BR IF YES 
5$: HALT ; :MOVB FAILED TO UPDATE SRC REG 
BR 1$ ;LOCK ON HARD ERROR 
[DEES E ESOS IOUS III IO OIE IID IE IOI IIIS IO ONDER tits 
:*TEST 104 BASIC 'MOVB (RA)+,X(RB) = SRC EVEN / DEST ODD 
TPCT TTOTTTTTTTOTTTTTTTCTTTITITTTTTTT TILT TTT TTT TLL Te LETTE 
181104: 
MOV #104 ,R0 ;;LOAD RO WITH TEST NUMBER 
MOV AMBUF 1 ,R2 :DEST ADDR = MBUF1 
MOV AMBUF C R53 TBASE DEST ADDR = MBUFO 
MOV #377 R4 SRESULT S / B = 37 
1$ MOV #DBTA,RS :SRC ADDR =_DBTA 
MOV #-1,(R2) :CDEST] = 177777 
CCC :SCOPE SYNC 
2$: MOVB (R5)+,5(R3) 7 TEST THE MOVB 
CMP R4, (R2) ;RESULT OK? 
BEQ 4$ 7;BR IF YES 
3$: HALT ;MOV DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP ADBTA+1,R5 :DID SRC REG GET INCREMENTED BY +1 
BEQ TST105 :;BR IF YES 
5$: HALT ;MOVB FAILED TO UPDATE SRC REG 
BR 1$ ;LOCK ON HARD ERROR 
DIDO IUISIOI SISO IOIDIOIUIOIOIDIOIIIOIUIDIDIDIOIDIUIDIUIDISIMIOI IOI OIDOIDOISIOIDOISIDIDDIDIOISIUIDI I I 
*TEST 105 BASIC 'MOVB (RA)+,X(RB) = SRC ODD / DEST EVEN 


CL AAA AAA ER ERE RARER EAA AEE ARERREAEAAEARARAAEAARARERAARARRERR ARR 


SEQ 0064 
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CQKDAE .P11 17-SEP-79 09:47 T105 BASIC 'MOVB (RA)+,X<(RB) = SRC ODD / DEST EVEN SEQ 0065 
3396 007612 TST105: 
3397 007612 012700 000105 MOV #105,R0 7;LOAD RO WITH TEST NUMBER 
3398 007616 012702 063322 MOV A#MBUF 1 ,R2 ;DEST ADDR = MBUF1 
3399 007 012705 063316 MOV AMBUF 0 ,R3 :BASE DEST ADDR = _MBUFO 
00 007626 012704 177401 MOV #177401,R4 RESULT S / B = 177401 
3401 007632 012705 064641 1$: MOV #DBTB+1,R5 :SRC ADDR = _DBTB+1 
3402 007636 012712 177777 MOV #-1,(R2) ;CDESTJ = 177777 
ar 007642 000257 CCC ; SCOPE SYNC 
Sehe 007644 112563 000004 es: MOVB (R5)+,4(R3) ; TEST THE MOVB 
3407 007650 020412 CMP R4,(R2) RESULT OK? 
opie 007652 001402 BEQ 4$ 7;BR IF YES 
3410 007654 000000 3$: HALT sMOV DELIVERED WRONG RESULT 
15 007656 000765 BR 1$ ;LOCK ON HARD ERROR 
3413 007660 022705 064642 4$: CMP #DBTB+2,R5 ;DID SRC REG GET INCREMENTED BY +1 
Sie 007664 001402 BEQ TST106 ;;BR IF YES 
3416 007666 000000 5$: HALT :MOVB FAILED TO UPDATE SRC REG 
1. 007670 000760 BR 1$ ;LOCK ON HARD ERROR 
3419 ZDIGIO OGIO IIOIOISISIIDISIOIOIOISIUIOIOIDIIOIOIIOIOIOIUIOIOIOI IOI IOI TOT OTT OT OTTO OTT TTT TTT 
3420 *TEST 106 BASIC *MOVB 2(RA),(RB)+'* TEST = SRC EVEN / DEST EVEN 
3421 CIGARS IOISIOIOIIOIOIOIOIOIOIOIOIOI ICID OITOI OI IOT ORT ITOT OTITIS ASISASI ISSA 
3422 007672 TST106: 
007672 012700 000106 MOV #106,R0 3zLOAD RO WITH TEST NUMBER 
3424 007676 012702 063316 MOV #MBUF O,R2 :DEST ADDR = MBUFO 
3425 007702 012704 177401 MOV #177401 ,R4 RESULT S / B = 177401 
3426 007706 012705 064036 MOV #DWTB,R ;SRC ADDR = DWTB 
3427 007712 010203 1$: MOV R2,R3 :R3 GETS ve $1 ADDR 
3428 007714 012713 177777 MOV #-1,(R3) :CDESTJ = 177400 
gt 007720 000257 CCC :SCOPE SYNC 
of 007722 116523 000002 2$: MOVB 2(R5),(R3)+ 7 TEST THE MOVB 
3433 007726 020412 CMP R4, (R2) ;RESULT OK? 
of 007730 001402 BEQ 4$ :BR IF YES 
3436 007732 000000 3$: HALT :MOVB DELIVERED WRONG RESULT 
og 007734 000766 BR 1$ ;LOCK ON HARD ERROR 
3439 007736 022705 063317 4$: CMP A#MBUF 0+1,R3 ;DID DEST REG GET INCREMENTED? 
ect 007742 001402 BEQ TST107 77BR IF YES 
3442 007744 000000 5$: HALT :MOVB FAILED TO AUTO INCREMENT DEST REG 
oe | 007746 000761 BR 1$ ;LOCK ON HARD ERROR 
3445 IOI IIUIOISISIUISISIIIOIDIOIIOIDIDIOIUIOIUIOIOIOIIOIDIOIOIOITIOIOIOIOIUIOIOOI III ITI TOIT II 
3446 SSTEST 107 BASIC 'MOVB 2(RA),(RB)+'* TEST - SRC ODD / DEST EVEN 
3447 PTT TTITITITILI TELE TELE TLE LETTE TELL LLL 
3448 007750 ré1107: 
3449 007750 012700 000107 MOV #107,R0 7;LOAD RO WITH TEST NUMBER 
3450 007754 012702 063316 MOV AMBUFO,R2 :DEST ADDR = MBUFO 
3451 007760 012704 177401 MOV #177401 ,R4 SRESULT S / B = 177401 


CQKDA=E_KD11-K BASIC ie aie 


CQKDAE .P11 17=SEP= 
%452 007764 012705 
53 007770 010203 
007772 01271 ; 

000257 

010000 116523 
3459 010004 020412 
60 010006 001402 
62 000000 
Scat 010612 000766 


3465 010014 022703 
4 010020 001402 


3482 
3483 010060 116523 
3484 


3485 010064 029412 
86 010066 001402 


88 010070 000000 
3489 010072 000765 


3490 
3491 010074 022703 
3%492 010100 001402 


34 000000 
oh 010104 000760 


3498 

3499 

3500 010106 

3501 010106 012700 
3502 010112 012702 
3503 010116 012704 
3504 010122 012705 
3505 010126 012703 
3506 010132 012712 
3507 010136 000257 


064640 
177777 


000001 


063317 


063320 


9 eh ge! 
1107 "MOVB 2(RA),(RB)+"’ 


1$: 


2$: 


3$: 


4$: 


5$: 
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#0B1B,R5 
Re ,R3 
#-1,(R3) 
1(R5),(R3)+ 


R4,(R2) 
4$ 


1$ 


AMBUF 0+1 ,R3 
TST110 


1$ 


67 
TEST = SRC ODD / DEST EVEN SEQ 0066 


SRC ADDR = DBTB 
:R3 GETS DEST ADDR 
;CDEST] = 177777 
SCOPE SYNC 


;TEST THE MOVB 


RESULT OK? 
;BR IF YES 


;MOVB DELIVERED WRONG RESULT 
;LOCK ON HARD ERROR 


DID 1 ae GET INCREMENTED? 


:MOVB FAILED TO AUTO INCREMENT DEST REG 
;LOCK ON HARD ERROR 


SL RARER AEE AEREEEREAREERAEEEARKEREEEERERERRERERRERRRREREREERRKRKRE EE 


S*TEST 110 


1S7110: 


28: 


3$: 


4$: 


5$: 


BASIC ‘'MOVB 2(RA),(RB)+'' TEST = SRC EVEN / DEST ODD 


WEARERS ASRARAARASASARRARASARARRR RR RREERR RRR RASA R ARRAS R SAAR ARRAS ARES AS S| 


#-1,(R2) 
2(R5),(R3)+ 


R4,(R2) 
4$ 


1$ 


#MBUF 0+2,R3 
TST11] 


1$ 


3;LOAD RO WITH Wi y NUMBER 


‘(DEST = 177777 
SSCOPE SYNC 


; TEST THE MOVB 


RESULT OK? 
BR IF YES 


pe DELIVERED WRONG RESULT 
;LOCK ON HARD ERROR 


:DID DEST REG GET INCREMENTED? 
IF YES 


;MOVB FAILED TO AUTO INCREMENT DEST REG 
;LOCK ON HARD ERROR 


WERORSGAASAARASESASLALEASLSSASLRASASESRASASSA ER RR SAR RRR RS RAA RRR RRS SRS S| 


SeTEST 1117 


151111: 


BASIC 'MOVB 2(RA),(RB)+'' TEST - SRC ODD / DEST ODD 


SLR EAE RARER REE EER EERE EERE EERE RRR R ARERR REN 


#111,R0 


#-1,(R2) 


2 LOAD RO wit" TEST NUMBER 
= MBUF 0 


:SRC ADDR = DBTB 
:R3 GETS a ADDR = MBUFO+1 
4572 = 177777 

SCOPE SYNC 
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CQKDAE .P 17=SEP=79 09:4 1117 “MOVB 2(RA),(RB)+'' TEST = SRC ODD / DEST ODD 
3508 
$240 010140 116523 000901 23: MOVB 1(R5),(R3)+ ;TES! THE MOVB 
3511 010144 020412 CMP R4,(R2) ;RESULT OK? 
$2\§ 010146 001402 BEQ 4$ [BR IF YES 
3514 010150 000000 3$: HALT ;MOVB DELIVERED WRONG RESULT 
$12 010152 000765 BR 1$ ;LOCK ON HARD ERROR 
3517 010154 022703 063320 4$: cme AMBUF 042,43 ;DID DEST REG GET INCREMENTED? 
$218 010160 001402 BEQ TST112 :;BR IF YES 
3520 010162 000000 S$: HALT ;MOVB FAILED TO AUTO INCREMENT DEST REG 
$25) 010164 000760 BR 1$ ;LOCK ON HARD ERROR 
3523 LEAR R ERR AREER AERA ARERR ER ERE ER 
3524 s*TEST 112 BASIC 'MOVB -(RA),RB'' TEST - SRC EVEN ADDR 
3525 LARA ERR ERE ARERR RE RERA RARER AAA AAA 
3526 010166 TST112: 
3527 010166 012700 000112 MOV #112,R0 ; LOAD RO WITH TEST NUMBER 
3528 010172 012705 063335 1$: MOV #DWTA+7,R5 ;SRC ADDR = DWTA+7 
3529 010176 005003 CLR R3 ;C(DESTJ = 000000 
rh 010200 000257 CCC ;SCOPE SYNC 
so88 010202 114503 2$: MOVB -(R5) ,R3 ; TEST THE MOVB | 
3834 010204 022703 177777 (MP W=1,RB ;RESULT OK? | 
ee 010210 001402 BFQ 4$ ;BR IF YES 
3537 010212 000000 3$: HALT ;MOVB FAILED - WRONG RESULT 
e255 010214 000766 BR 1$ ;LOCK ON HARD ERROR 
3540 010216 022705 063334 4$: CMP #OWTA+6,R5 ;SRC REG GET DECREMENTED? 
$205 010222 001402 BEQ TST113 ;7;BR IF YES 
3543 010224 000000 5$: HALT ;MOVB FAILED TO UPDATE SRC REG 
3544 010226 000761 BR 1$ ;LOCK ON HARD ERROR 
3545 [EES EEE IIIS IU IOUIOIOUIIESUIUIOOUIEUUEUEOUOUE Snr in int 
3546 p*TEST 113 BASIC 'MOVB -(RA),RB’’ TEST - SRC ODD ADDR 
3547 SR RRR EERE RRR REE RRR ER ER ER RE EE 
3548 010230 TST113: 
3549 010230 012700 000113 MOV #113.R0 :;LOAD RO WITH TEST NUMBER 
3550 010234 012705 063334 1$: MOV #DWTA+6,R5 :SRC ADDR = DWTA+6 
3551 010240 005003 CLR R3 :CDESTJ = 000000 
2228 010242 000257 CCC ;SCOPE SYNC 
tee 010244 114503 2$: MOVB -(R5) ,R3 ;TEST THE MOVB 
3556 010246 022703 177777 CMP #-1,R3 RESULT OK? 
S220 010252 001402 BEQ 4$ ;BR IF YES 
3559 010254 000000 3$: HALT ;MOVB FAILED - WRONG RESULT 
so04 010256 000766 BR 1$ :LOCK ON HARD ERROR 
3562 010260 022705 063333 4$: CMP MDWTA+S RS ;SRC REG GET DECREMENTED? 
3563 010264 001402 BEQ TSI1146 ;7BR IF YES 








on 
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CQKDA=E KD11=k BASIC Loci TESTS MACY 
CQKDAE P11 17=SEP=79 09:47 ™113. += BASIC "MOVB =(RA),RB'' TEST = SRC ODD ADDR SEQ 0068 
3564 
3565 010266 000000 S$: HALT :MOVB FAILED TO UPDATE SRC REG 
3366 010270 000761 BR 1$ “LOCK ON HARD ERROR 
3ee8 FF AAAARARARARARAAEAARRARRRAKERARRARARARAAERRARRERRRARARARRARARRERR EH 
3569 T*TEST 114 BASIC 'MOVB (RA)+,=(SP)"’ TEST = SRC ADDR EVEN 
357 CF RAAARAAARARARERRARAAARKAAARRARARARARRERRARARARRARRARARAAARARRREEE 
3571 010272 TST114: 
3572 010272 612700 000114 MOV #114,R0 ::LOAD RO WITH TEST NUMBER 
3573 010276 010605 MOV SP,R :SAVE SP 
3574 010 012704 177400 MOV #1776400,R4 ;RESULT S / B = 177400 
3575 010304 010506 1$: MOV R5,SP RESET SP FOR ERROR LOOP 
3576 010306 012703 064634 MOV #DBTA,R3 “SRC ADDR = DBTA 
3577, 910312 012746 177777 MOV #-1,-(SP) :(DESTJ = 177777 
3578 010316 010602 MOV SP ,R2 :R2 GETS DEST ADDR 
3579 010320 005726 TST (SP) +4 sRESET SP 
3980 010322 000257 CCC :SCOPE SYNC 
3582 010324 112546 28: MOVB (R3)+,=(SP) : TEST THE MOVB 
3584 010326 022703 064635 CMP #DBTA+1,R3 7;DID MOVB INCREMENT SRC REG? 
3585 010332 001402 BEQ 4$ “BR IF YES 
3587 010334 000000 3$: HAL T :MOVB FAILED TO UPDATE SRC REG 
3988 010336 000762 BR 1$ =LOCK ON HARD ERROR 
3590 010340 020412 4$: CMP R4,(R2) sRESULT OK? 
3291 010342 001402 BEQ of “BR IF YES 
3593 010344 000000 HALT ;MOVB FAILED TO a CORRECT RESULT 
334 010346 000756 BR 1$ :LOCK ON HARD ERR 
3596 010350 020206 6$: c R2,SP :DID SP GET PUSHED BY 2 ? 
3397 010352 001402 BEQ 8$ :BR IF YES 
3599 010354 000000 HALT ;MOVB FAILED TO PUSH SP PROPERLY 
scot 010356 000752 BR 1$ ;LOCK ON HARD ERROR 
3602 010360 010506 8$: MOV R5,SP :RESET SP IN CASE OF ERROR 
3604 LEAR REE AEEREKEERERE REE ERERRERRAARERERREEREREREAR TEER EEE 
3605 s*TEST 115 BASIC ‘MOVB (RA)+,-(SP)'' TEST - SRC ADDR ODD 
3606 SLAC RRA RARER EEE ERE REEREKEE AEE RERER ERED 
3607 010362 11115: 
3608 010362 012700 000115 MOV #115,R0 ::LOAD RO WITH TEST NUMBER 
3609 010366 010605 MOV SP,R :SAVE SP 
3610 010370 012704 177400 MOV #177400,R4 “RESULT S / B = 177400 
3611 010374 010506 1$: MOV R5,SP sRESET SP FOR ERROR LOOP 
3612 010376 012703 064041 MOV A#DWIB+2,R3 :SRC ADDR = DWIB+3 
3613 010402 012746 177777 MOV #-1,-(SP) :CDESTJ = 177777 
3614 010406 010602 MOV SP ,R2 ‘R2 GETS DEST ADDR 
3615 910410 005726 TST (SP)+ SRESET SP 
3616 010412 000257 ccc :SCOPE SYNC 
3618 010414 112346 2%: MOVB (R3)+,-(SP) :TEST THE MOVB 
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CQKDAE .P11 


010416 
010422 


010424 
010426 


010430 
010432 


010434 
0104 36 


010440 
010442 


010444 
010446 


010450 


17=SEP=79 09:47 


022703 
001402 


000000 
000762 
020412 
001402 
000000 
000756 
020206 
001402 
000090 
000752 
010506 


012700 


064042 


MACY 
1115 


6$: 


8$: 


SERRA REAR ERAEAAEAEAAREAEREEEAEEEAKERA REE REREKKEEEEE 


11 eh ie 
BASIC "MOVB (RA)+,=(5P)"* TEST = SRC ADDR ODD 


;D1D MOVB INCREMENT SRC REG? 
;BR IF YES 


CMP 
BEO 


HALT 
BR 


CMP 
BEQ 


HALT 
BR 


CMP 
BEQ 


HALT 
BR 


MOV 


8 TEST 116 


E 6 
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ADWIB+4,R3 
4$ 


1$ 
R4,(R2) 
6$ 


1$ 
Re, SP 
8$ 


1$ 
R5,SP 


BASIC 'MOVB X(R),a@AA"' 


#176,R0 
aMBLF 0. R2 


*uiB, RS 
(R2) 


;MOVB FAILED TO UPDATE SRC REG 
;LOCK ON HARD ERROR 


RESULT OK? 
;BR IF YES 


;MOVB FAILED TO — CORRECT RESULT 


;LOCK ON HARD ERR 


;01D SP GET PUSHED BY 2 
;BR IF YES 


;MOVB FAILED TO PUSH SP 


;LOCK ON HARD ERROR 


;LOAD RO WITH yy NUMBE R 


: SCOPE SYNC 


sRESET SP IN CASE OF ERROR 


TEST = SRC EVEN / DEST EVEN 


WEARER RRR R RR RR RR RRR RRRRR RR RRR RRR ESR RRR RRR RRR RR RA RRR RRR RRR RE SS 


TST116: 


SEQ 0069 





r ef comet om 
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CQKDAE .P11 17=SEP=79 09:4 7116 *"MOVB K(R),@MA'’ TEST = SRC EVEN / DEST EVEN SEQ 0070 
$62) 010476 116537 000006 065316 2$: MOVB 6(R5) , @AMBUF O ; TEST THE MOVB 
3653 0105046 020412 CMP RG, (R2) NBR IE OK? 
$28 010506 001402 BEQ TSILle ;;BR IF YES 
3656 010510 000000 3$: HALT ;MOVB DELIVERED WRONG RESULT 
3657 010512 000767 BR 1$ ;LOCK ON HARD ERRROR 
3658 CDI III ISIIIDIIIIIOIOIIOIOIUIIUIDIIOIOIOIOIUIOIUIOIIIDIOIOIUIOIUIOIUIIUIIO I ttt titt 
3659 *#TEST 117 BASIC 'MOVB X(R),@MA’' TEST = SRC ODD / DEST EVEN 
3660 CC RAAAAAAARARARARARARRAARRRARARAAARAARKRARARRARHRRARRRAARERRARAAE ES 
3661 010514 TST117: 
3662 010514 012700 000117 MOV #117,R0 ;;LOAD RO WITH TEST NUMBER 
3663 010526 012702 063316 MOV AMBUFO,R2 ;DEST ADDR = MBUFO 
3664 010524 012704 000001 MOV #1,R4 ;RESULT S$ / B= 1 
3665 010530 012705 064640 MOV #DBTB, R5 ;BASE SRC ADDR = DBTB 
3666 010534 005012 1$: CLR (R2) ;CDESTJ = 000000 
3667 010536 000257 CCC SCOPE SYNC 
944 016540 116537 000001 063316 2$: MOVB 1(R5) , @4MBUF 0 : TEST THE MOVB 
3671 010546 020412 CMP R4,(R2) sRESULT OK? 
3076 010550 001402 BEQ TST120 :;BR IF YES 
3674 010552 000000 53: HAL T :MOVB DELIVERED WRONG RESULT 
3675 010554 000767 BR 1$ ;LOCK ON HARD ERRROR 
3676 j CLARA AAA EAKRREAERERRERERRARRARKARERARRRARARREARAKRENRRRE HS 
3677 ;*TEST 120 BASIC ‘MOVB XK(R),a@MA"' TEST - SRC EVEN / DEST ODD 
3678 DDI IOIIUIOISIIIIIDIOIIOIOIIOIUIDIUIDIOIOIOIIIDIUIDIIDIOIOIOIOIOIOIOIDIOIOIOIOIOIUIOIDIDIDIDIDIDINE It 
3679 010556 TST120: 
3680 910556 012700 000120 MOV #120,R0 :LOAD RO WITH TEST NUMBER 
3681 010562 012702 063316 MOV AMBUFO,R “BEST ADDR = MBUFO 
3682 010566 012704 0400 MOV #400,R4 RESULT S/B=4 
3683 010572 012705 064036 MOV #DWTB,RS ;BASE SRC ADDR = DWTB 
3684 010576 005012 1$: CLR (R ;(DESTJ = 00000 
3685 010600 000257 CCC : SCOPE SYNC 
3687 010602 116537 000006 063317 2$: MOVB 6(R5) ,@4#MBUFO+1 = TEST THE MOVE 
3689 010610 020412 CMP R4, (R2) sRESULT OK? 
<n 010612 001402 BEQ TST121 77BR IF YES 
3692 010614 000000 3$: HAL T :MOVB DELIVERED A RESUi T 
3693 010616 000767 BR 1$ ;LOCK ON HARD ERRROR 
3694 PPRTTSTITITICICICOCTTCTCCCTITITITTTICTTCT IT TE ToT T Tit Tit ttt tit tte 
3695 s*TEST 121 BASIC *MOVB X(R),a@MA’' TEST = SRC ODD / DEST ODD 
3696 DDI IO IISIIDIIIIIOIOIIUIOOIUIIUIOIIUISIIOIUIUIUIDIDOIIOIDIIDIOIDIOISIDIOISIDI IDG IOI 
3697 010620 TST121: | 
3698 010620 012700 000121 MOV #121,R0 ;LOAD RO WITH TEST NUMBER 
3699 SeTTh USER CONTROLLED BREAKPOINT’ -- BIT2 
3700 010624 032737 000004 063240 BIT wr hae @4/BPTLOC ;BREAKPOINT HALT SET ?? 
3701 010632 001401 BEQ s IF NOT 
3702 010634 000000 HAL T ;BREAK - JEPRESS CONTINUE TO RESTART 
3703 010636 012702 063316 MOV AMBUFO,R2 ‘DEST ADDR = MBUFO 
3704 010642 012704 000400 MuV #400 ,R4 es S / B = 400 
3705 010646 012705 064640 MOV #DBTB,R5 SRC ADDR = DB'B 


3706 010652 005012 1$: CLR (R2) ‘tbesrs = 000000 
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010654 000257 
010656 116537 


010664 0204612 
010666 001402 


010670 
010672 


000001 


000090 
000767 


010674 
010674 
010700 


010702 


000122 


010712 000402 


3730 010714 
010716 


010720 
010720 
010724 
010726 


010730 
010732 


010734 


010736 
010740 


010742 


010744 
010746 


010750 
010750 


010752 
010754 


012700 
000277 


001402 


000000 
000774 


100402 


000000 
000771 


102402 


000123 


063317 
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USER CONTROLLED BREAKPOINT -- BIT SEQ 0071 
CCC SCOPE SYNC 
$: MOVB 1(R5) ,@AMBUFO+1 ; TEST THE. MOVB 
CMP R4,(R2) RESULT OK? 
BEQ TST122 ;7BR IF YES 
3$: HALT ;MOVB DELIVERED te RESULT 
BR 1$ ;LOCK ON HARD ERRROR 


VERDE RRRRR RRR RRRRRRRRRRRRRRRRASRRRRRR RRR RRR RRR RRR SAA RRR RRR RSS ES OD 


teTEST 122 BASIC QUICK VERIFY TEST FOR BMI,BEQ,BVS,BCS-FLG=0 


WERARARARRARRRRRRARRRBRARRASRRRASRRRARRRR RASS SRR RRR ARRAS AR RAR RR ERR SRR SE 


751122: 
MOV #122,R0 ::LOAD RO WITH TEST NUMBER 

1$: CCC :CLEAR ALL FLAGS 

as: BEQ 3$ ZNO BR SHOULD OCCUR-FLAG=0 
BM | 3$ ZNO BR SHOULD OCCUR-FLAG=0 
BVS 3$ :NO BR SHOULD OCCUR-FLAG=0 
BCS 3$ :NO BR SHOULD OCCUR-FLAG=0 
BR TS7123 7:GO TO NEXT TEST 

3$: HALT ZONE OF ABOVE BR'S FAILED 
BR 1$ sERROR LOOP RETURN 


DEAR RRR RRR RRR RR RRRR ARRAS ARRAS RRR R ASRS RSE RS SS 


SeTEST 123 BASIC QUICK VERIFY TEST FOR BMI ,BEQ,BVS,BCS-F LAG=1 
CE RAAAARAAAAAAAEAORAARARAAARRARARARRAAHAAREAARARAAARARRAKRARERERERARE 
71123: 
MOV #7 23,R0 ; LOAD RO WITH TEST NUMBER 
1$: SCC sMAKE N:C = 1111 
218: BEQ 22$ : TEST THE BEQ-IT SHOULD BR 
3$: HALT ;BEQ FAILED 
BR 1$ ;ERROR LOOP RETURN 
ees: BM] 23% ;TEST THE BMI-IT SHOULD BR 
5$: HALT ;BMI FAILED 
BR 1$ ZERROR LOOP RETURN 
238: BVS 24$ ; TEST THE BVS-IT SHOULD BR 
7$: HAL T ;BVS FAILED 
BR 1$ ZERROR LOOP RETURN 
24% 
BCS TS7124 Zz TEST THE BCS-I1T SHOULD BR 
9: HALT :BCS FAILED 
BR i$ ZERROR LOOP RETURN 


SST AAAAEAAHAKEAAARAARAAERARARRARRARARAS ARERR RAHAHHAAARHRH AREA 


SeTEST 126 


BASIC BvC TEST WITH V=1 





Say teas BASIC 
AE .P 17=SEP=79 


010756 
010756 


010762 


010764 
010766 


010770 
010772 


010774 
010774 


011000 


011002 
011002 


011004 
011006 


011010 
011010 


011014 


011016 
011016 


011020 
011022 


011024 
011024 


011030 
011032 


011034 
011036 


011040 
011042 


012700 000124 


000262 
102001 
000402 


000000 
000773 


012700 
000242 


102002 


000000 
000774 


012700 
000257 


002002 


000000 
000774 


012700 


000257 
000262 


002001 
000402 


000000 
000772 





LOG 


ou 
oo 
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7724 BASIC SVC TEST WITH y=1 


Webi Ree RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RE REE RE RRR RRR ES 


751126: 
MOV #124,R0 ;iLOAD RO WITH TEST NUMBER 
1$: SEV sMAKE v=1 
23: BvC 3$ re. THE BVC-IT SHOULDN'T BR 
BR TS7125 ;GO TO NEXT TEST 
3$: HALT ‘ sBVC FAILED 
BR 1$ ;ERROR LOOF RETURN 
CF AAAAARAHAAAERAAAAAAERAAARAAERERARRARRARARARAAEEERAAEARAERERAHE REED 
s*TEST 125 BASIC BVC TEST WITH v=0 
CLARA ARAAAAARRARAEERAERAERRAERAERERAEAREARAEERREHRAREEEERRE RENE 
1$7125: 
MOV #125,R0 :7;LOAD RO WITH TEST NUMBER 
1$: CLV iMAKE v=0 
es: 
BVC TS7126 ii TEST THE BVC-IT SHOULD BR 
3$: HALT sBVC FAILED 
BR 1$ ;ERROR LOOP RETURN 
PPUTTTIITITITITITTTILITTTIT ITIL TITEL TTT TTT ETT 
ssTEST 126 BASIC BGE TEST WITH N,V = 00 
SC RAAAAAAEARERAEREKERARAKARRRAREREAREAAERAERKAAAER AERA RERARAEAEREER EEE EE 
TST126: 
MOV #126,R0 ::LOAD RO WITH TEST NUMBER 
1$: CLE :MAKE N:C = 0000 
es: 
BGE TST127 32 TEST THE BGE-IT SHOULD BR 
3$: HALT :BGE FAILED 
BR 1$ ;ERROR LOOP RETURN 
LIRR AREER ARERR R EEE EKERREEERAREERAAEERARERER KENTA RRE REA ES 
i*TEST 127 BASIC BGE TEST WITH N,V = 01 
SDAA AREER EERE AERA ERE KEERRRERRERKARERERERA RARE REED 
TST127: 
MOV #127,R0 : LOAD RO WITH TEST NUMBER 
1$: CCC ;CLEAR FLAGS 
SEV sMAKE N,V = 01 
2$: BGE 3$ ;TEST THE BGE-IT SHOULDN'T 8h 
BR TST130 ::GO TO NEXT TEST 
3$: HAL T ;BGE FAILED 
BR 1$ ;ERROR LOOP RETURN 


CATA AA RARER REAR REEHARAARAHERKEERARAREHARHRHERH ERE EKRRERERe RHEE Ee 








CQKDA=E KD11=K BASIC LOG 

CQKDAE .P11 17=SEP=79 
3819 
3820 
3821 0710464 
3822 0911064 012700 
38235 
3824 011050 000257 
3825 011052 000270 
3826 
3827 011054 002001 
3828 011056 000402 
3829 
3830 011060 000000 
3831 011062 000772 
3832 
3835 
3834 
3835 
3836 011064 
3837 011064 012700 
3838 
3839 011070 000257 
3840 011072 000272 
3841 
3842 011074 
3843 011074 002002 
7844 
3845 011076 000000 
3846 011100 000773 
3847 
3848 
3849 
3850 
3851 011102 
3852 011102 012700 
3853 
3854 011106 000257 
3855 
3856 011110 002401 
3857 011112 000402 
3858 
3859 011114 000000 
3860 011116 000773 
3861 
3862 
3863 
3864 
3865 011120 
3866 011120 012700 
3867 
3868 011124 000257 
3869 011126 000262 
3870 
3871 011130 
3872 011130 002402 
3873 
3874 011132 000000 


000130 


000131 


000132 


000133 
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7130 BASIC BGE TEST WITH N,V = 10 


s*TEST 130 BASIC BGE TEST WITH N,V = 10 
SF RAAAAAAARAAAARAAARAHRARARARRARERARARHAAAAAHAARARERARTEREARHE EAE E HS 
1$7130: 
MOV #130,R0 ;ZLOAD RO WITH TEST NUMBER 
1$: CCC CLEAR FLAGS 
SEN *MAKE N,v = 10 
es: BGE 3$ ey THE BGE-IT SHOULDN'T BR 
BR 7$7131 :GO TO NEXT TEST 
%$: HALT sBGE FAILED 
BR 1$ sERROR LOOP RETURN 


STAIR AARAAARARRAREEEERAARRAERRARRAREREAARRARERRARKERRHERRERER EERE 
seTEST 131 BASIC BGE TEST WITH N,V = 11 
LETRA RR ARARARARRAEAAERRAEAERENHARARHERARARAAARAREERAREEHAHERHAARRE AS 
TST131: 

MOV #131,R0 7ZLOAD RO WITH TEST NUMBER 


1$: CCC i CLEAR FLAGS 


272 “MAKE MV = TT 
es: 
BGE TST132 727EST THE BGE-IT SHOULD BR 
$$: HALT ;BGE FAILED 
BR 1$ sERROR LOOP RETURN 
LER REE RAE REE RARAERAARRAERRARERARAERREREAERERRRR EKER ERE EE 
S*TEST 132 BASIC BLT TEST WITH N,V = 00 


DRA RARE E ARERR ERERREAEEREREREREERERKE REE R EEE S 
T8713: 


MOV #132,R0 72LOAD RO WITH TEST NUMBER 


1$: CCC ; CLEAR FLAGS 

2$: BLT 5$ TEST THE BLT-IT SHOULDN'T BR 
BR TS7T133 3:GO TO NEXT TEST 

3$: HAL T ;BLT FAILED 
BR 1$ ERROR LOOP RETURN 


CRATER ARAA ATR NRAREERRARHERREARERREKREORRAEERHHREREKERERE KEKE ES 
seTEST 133 BASIC BLT TEST WITH N,V = 01 

CUE AEA RARER EERE ARERERKAEEAAKRAEERAERERRERERER ARERR ES 
1S7133: 


MOV #133,R0 ;2LOAD RO WITH TEST NUMBER 


1$: CCC ZCLEAR FLAGS 
SEV [MAKE N,V = 01 
2$: 
BLT TS7134 :7 TEST THE BLT-IT SHOULD 8R 


3$: HAL T :BLT FAILED 


SEQ 0073 


SS 


CQKDA=E_ KD11=-K SASIC LOGIC TESTS 


CQKDAE .P11 


011134 


4 4 


oOo OO 00 CO 
hat ata ada ada 
aha ala aibeal 

VI SS SL Ww 
moO OO £f oOo 


_— 


 — _— ~~ 


011214 
011214 


011220 
011222 


17=SEP=79 


000773 


012700 
000257 
000270 
002402 


000000 
000773 


012700 


000257 
000272 


002401 
000402 


000000 
000772 


012700 


000257 
000266 
003001 
000402 


000000 
000772 


012700 


000257 
000262 


09:47 


000134 


9000135 


0001 36 


000137 
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1133 BASIC BLT TEST WITH N,V = 01 


BR 1$ ERROR LOOP RETURN 


fF AAARARARARAAAAAAARARRAAARARARERKARRKRARRAARRARHARAAARARRARERRARARAAE 


z*TEST 134 BASIC BLT TEST WITH N,V = 10 


SS RARAAAAARARAAARAKARAARERREEKAKRREHRRARARRRARAAERERAARRAARAERAER EHS 


1S1134: 


MOV #134,R0 :;LOAD RO WITH TEST NUMBER 
1$: ccc sCLEAR FLAGS 
SEN SET N=- N,V = 10 
2$: 
BLT TST135 27 TEST THE BLT-IT SHOULD BR 
3$: HAL T ;BLT FAILED 
BR 1$ ZERROR LOOP RETURN 
WEAeee eR RRS RRRRARASSES RES RS RES RR SAS RE RRR ASR RAR SRS SRR RR SER RRS SE ODD 
S*TEST 135 BASIC BLT TEST WITH N,V = 11 
Pee eaRRRSRSASSASLARASASASSE SRSA SRR SESSA AR SRS RARE RAR AAS RRR RSS RRR RRS ASSES SSG 
1S1135: 
MOV #135,R0 :7LOAD RO WITH TEST NUMBER 
1$: CCC J cng FLAGS 
272 [MAKE N Vv = 11 
2$: BLT 3$ ; TEST THE BLT-IT SHOULDN'T BR 
BR TST136 72GO TO NEXT TEST 
3$: HALT ;BLT FAILED 
BR 1$ ;ERROR LOOP RETURN 
ee ee 
s*TEST 136 BASIC BGT TEST WITH Z = 1 AND N,V = 01 
WRASSE SSSSSSASRASASALASSESSLSS SESS ESAS SAS ESSER ARRAS RRS S RRR RRR RS RS RSS SS 
151136: 
MOV #136,R0 ;Z,LOAD RO WITH TEST NUMBER 
1$: CCC ; CLEAR FLAGS 
266 :SET Z AND V 
es: BGT 3$ ; TEST THE BGT-IT SHOULDN'T BR 
BR TST137 ::GO TO NEXT TEST 
3$: HALT :BGT FAILED 
BR 1$ ;ERROR LOOP RETURN 
WERE RSSSAELZESSES ESE SSR SESE ESSERE RRS RRR RR SARE RRR RSE RRR RRR RRS SS SSF 
Se TEST 137 BASIC BGT TEST WITH Z = 0 AND N,V = O1 
4 , PRESSES SAE AHS SS RG OE HARE HSA ASER ORAS RES ASS SOOO E AOS N Seay ee Tees 
1S1137: 
MOV #137,R0 ;;LOAD RO WITH TEST NUMBER 
1$: CCC :CLEAR FLAGS 
SEV sSeT 


SEQ 0074 


RP aR Seta Pea Ciara Nese os ee ee ah 


CQKDAE_KD11-K BASIC LOGIC TESTS 
CQKDAE .P11 17=SEP=79 09:47 
3931 011224 003001 
3932 011226 000402 
3933 
3934 611230 000000 
a 5 011232 000772 
3937 
3938 
3939 
3940 011234 
$00) 011234 012700 000140 
3943 011240 000257 
3944 011242 000264 
3945 
3946 011244 003001 
3947 011246 000402 
3948 
3949 011250 000000 
3950 011252 000772 
3951 
3952 
3953 
3954 
3955 011254 
243] 011254 012700 000141 
3958 011260 000257 
3959 
3960 011262 
3961 011262 003002 
3962 
3963 011264 000000 
3964 011266 000774 
3965 
3966 
3967 
3968 
3969 011270 
da 011270 012700 000142 
3972 011274 000257 
3973 011276 000266 
3974 
3975 011300 003001 
3976 011302 000402 
3977 
3978 011304 000000 
3979 011306 000772 
3980 
3981 
3982 
3983 
3984 011310 . 
3985 011310 012700 000143 
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1137 BASIC BGT TEST WITH Z = 0 AND N,V = 


2$: BGT 3$ ; TEST THE BGT=IT SHOULD NOT BR 
BR TST140 3:GO TO SCOPE LOOP EXIT 
3$: HALT ;BGT FAILED 
BR 1$ ERROR LOOP RETURN 
TS > etean alataetgete intent nee tetsene narnineniatcentat etal aaa 
i*TEST 140 BASIC BGT TEST WITH Z = 1 AND N,V = 00 


Wee ARARSRARRRSARSAASSRSERARARARRRAR RRR RRR ARR RRA RAR SR RR RRR SRSA RSS S| 


1S$1140: 


#140,R0 3;LOAD RO WITH TEST NUMBER 
1$: CCC ;CLEAR FLAGS 
SEZ SET Z 
2$: BGT 3$ ; TEST THE BGT-IT SHOULD NOT BR 
BR TST141 3:GO TO SCOPE LOOP EXIT 
3$: HALT ;BGT FAILED 
BR 1$ ERROR LOOP RETURN 


a AS le et ag a tea A age mace hay ayn NEN ais oa Ste oleate ntiiiae C 


i*TEST 141 BASIC BGT TEST WITH Z = 0 AND N,V = 00 


Whee ee eee eR RRRRERRRRRRERRRRERRRLRRRRR RRR RR RRR RRR RRR R ARERR RRA S SD OS 


7ST141: 


MOV #141,RO0 37LOAD RO WITH TEST NUMBER 
18: CCC CLEAR FLAGS 
2$: 
BGT TST142 i TEST THE BGT - IT SHOULD BR 
3$: HALT ;BGT FAILED 
BR 1$ ;ERROR LOOP RETURN 
Free Aa ey tage a tpt lS ole it ie Aa asad al Ey eae ta octane 
i*TEST 142 BASIC BGT TEST WITH Z = 1 AND N,V = 01 


SL AAR REREAD 


1S$1142: 


MOV #142,R0 : LOAD RO WITH TEST NUMBER 
1$: CCC one gl FLAGS 
266 ‘MAKE N ~V = 07 AND Z = 1 
2$: BGT 3$ :TEST THE BGT-IT SHOULDN'T BR 
BR TST143 ::G0 TO NEXT TEST 
3$: HALT :BGT FAILED 
BR 1$ ;ERROR LOOP RETURN 
CPA AAA AAA REAR REAR RERERRERERAKRAEAERAEEAARAT RARER EES 
S*TEST 143 BASIC BGT TEST WITH Z = 1 AND N,V = 10 


DIGI UIUOIIUIIISIOIUIDIOUISIIOIISIIUIOOOOIIOUIDIUUIDIOUIUIDUIOU OD iar trts 
TS7143: 
MOV #143,R0 37LOAD RO WITH TEST NUMBER 


SEQ 0075 


CQKDA=E A ie BASIC LOGIC TESTS 


CQKDAE .P 17=SEP=79 
3987 011314 000257 
3988 011316 000274 
3989 
3990 011320 003001 
3991 011322 000402 
3992 
3993 011324 000000 
3994 011326 000772 
3995 
3996 
3997 
3998 
3999 011330 
4000 011330 012700 
4001 
4002 011334 000257 
4003 011336 000276 
4004 
4005 011340 003001 
4006 011342 000402 
4007 
4008 011344 000000 
4009 011346 000772 
4010 
4011 
4012 
4013 
4014 011350 
4015 011350 012700 
4016 
4017 011354 000257 
4018 011356 000272 
4019 
4020 011360 
4021 011360 003002 
4022 
4023 011362 000000 
4024 011364 0007735 
4025 
4026 
4027 
4028 
4029 011366 
4030 011366 012700 
4031 
4032 011372 000257 
4033 
4034 011374 
4035 011374 101002 
4036 
4037 011376 000000 
4038 011400 000774 
4039 
4040 
4041 
4042 


09°47 


000144 


000145 


000146 
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BASIC BGT TEST WITH Z = 1 AND N,V = 10 ‘ SEQ 0076 
1$: CCC ; CLEAR FLAGS 
274 [MAKE 2 = 1 AND N,V = 10 
2$: BGT 3$ ; TEST THE BLT-IT SHOULDN'T BR 
BR TST144 +260 TO NEXT TEST 
3$: HALT ;BLT FAILED 
BR 1$ ;ERROR LOOP RETURN 
SL AAA RARER RARER ARAEREREEERAERREKRRAEHEREREERAERRR EE 
s*TEST 144 BASIC BGT TEST WITH Z = 1 AND N,V = 117 
CL RARER REA RRRENORERERREEERERREAEAERRERERAEREEREE EERE RENAE EH 
TST144: 
MOV #144,R0 ;7LOAD RO WITH TEST NUMBER 
1$: CCC nee FLAGS 
276 MAKE Z = 1 AND N,V = 11 
2$: BGT 3$ tt THE BGT-IT SHOULD NOT BR 
BR TST145 :GO TO NEXT TEST 
3$: HALT :BLT FAILED 
BR 1$ sERROR LOOP RETURN 
LTA RARER EAE ARE KE EKEERRERERE ARERR EERE EREERR EKER EE 
s*TEST 145 BASIC BGT TEST WITH Z=0 AND N,V=11 
MAAR ARALRASAASRASAA AAS RSRSRA ESSE ESSE SER ERS SSSR ERS ERR SRR RRR SRR RRR SS 
187145: 
MOV #145,R0 7ZLOAD RO WITH TEST NUMBER 
1$: CCC CLEAR FLAGS 
272 sMAKE N:C=1010 
2$: 
BGT TST146 Sz TEST THE BGT - IT SHOULD BR 
3$: HALT ;BGT FAILED 
BR 1$ sERROR LOOP RETURN 
ger gag neg tiger ig rng ag semen ce a nniele ae 
s*TEST 146 BASIC BHI TEST WITH Z,C = 00 
CLEARER ERE EEE ERE REE RAE REE EKER RK 
TST146: 
MOV #146,R0 :ZLOAD RO WITH TEST NUMBER 
1$: CCC 7MAKE 7,C = 00 
2s: 
BHI TS7T147 7: TEST THE BHI-IT SHOULD BR 
3$: HALT :BHI FAILED : 
BR 1$ sERROR LOOP RETURN 
'WEReARESRESAASSASSSSSSS SERS RESES ESSE SRE RRR ER ERR SRR SRP RSE R REESE EROS 
SeTEST 147 BASIC BHI TEST WITH Z,C = 01 


+; (RES SSR SSSERSSRSSSERSA SESE RR ER ESSERE RRR RRR RRR ERE RS RRR ERR RRS SSS 


CQKDA-E es, BASIC LOG 
CQKDAE .P11 


011402 
011402 


911406 
011410 


011422 


011426 
011430 


011432 
011434 


011436 
011446 


011442 
011442 


011446 
011450 


011452 
011454 


011456 
011460 


011462 


011502 


011504 
011506 


IC TESTS 
17=SEP=79 09:47 
012700 000147 


000257. . 
000261 - 


101001 
000402 


000000 
000772 


012700 


000257 
000264 


101001 
000402 


000000 
000772 


012700 


000257 
000265 


101001 
000402 


000000 
000772 
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1147 BASIC BHI TEST WITH Z,C = 01 


TST147: 
MOV #147,R0 ;zLOAD RO WITH TEST NUMBER 


1$: CCC ; CLEAR FLAGS 
SEC sMAKE Z,C = 01 


2$: BHI 3$ TEST THE BHI-IT SHOULD NOT BR 
BR TST150 ::GO TO NEXT TEST 


3$: HALT ;BHI FAILED 
BR 1$ ERROR LOOP RETURN 


WEARER AARASASZAALALALSSSLASSASAS RES ERE RRR SERS REAR ER RASA RRR R SSSA SS 


s*TEST 150 BASIC BHI TEST WITH Z.C = 10 
STARR EERE REE ERE REE AERA RE RARER ER 
TST150: 

MOV #150.R0 ::LOAD RO WITH TEST NUMBER 


1$: ;CLEAR_ FLAGS 
[MAKE Z,C = 10 


2$: BHI 3$ ; TEST THE BHI-IT SHOULD NOT BR 
BR TST151 3;GO TO NEXT TEST 


3$: HALT ;BHI FAILED 
BR 1$ ;ERROR LOOP RETURN 


DUR OR OCI OIIOIOICIOIICIOIOIOR UIUC TORII ORR TOR TTT AIAAISIISISSS IIS ISAS AN. 
:*TEST 151 BASIC BHI TEST WITH Z,C = 11 
DUIS IOISIDISISISIOISISIOIUIDIOIOISIOIIOIIOIIOIOIOIUIOIOIDIOI III IOI IORI TORTI TROT TROT AOR 
TST151: 

#151,R0 3zLOAD RO WITH TEST NUMBER 


1$: : CLEAR toe 


2$: BHI 3$ ; TEST THE BHI-IT SHOULDN'T BR 
BR TST152 3:GO TO NEXT TEST 


38: HALT ;BHI FAILED 
BR 1$ ERROR LOOP RETURN 


SARA RRO 


s*TEST 152 BASIC NEG MODE 0 TEST : CDESTJ GT 0 
CLARE ERE EERE EERE EERE ERE EES 
TST152: 
#152,R0 :7LOAD RO WITH TEST NUMBER 
#=-2 ,R4 sRESULT S / B = 177776 
1$: #2,R3 zINI TAL CDEST] = 
3 ge FLAGS 
7MAKE N:C = 0110 


2$: R3 TEST THE NEG 


3$ 
3$ DID N:C = 1001? 


SEQ 0077 





CQKDA-E KD11-K 


CQKDAE.P11 
4099 011510 
4100 011512 
4101 
4102 011514 
4103 011516 
4104 
4105 011520 
4106 011522 
4107 
4108 011524 
4109 011526 
4110 
4111 
4112 
4113 
4114 011530 
4115 011530 
4116 011534 
4117 011540 
4118 011544 
4119 011550 
4120 
4121 011552 
4122 
4123 011560 
4124 011562 
4125 011564 
4126 011566 
4127 011570 
4128 
4129 
4130 
4131 
4132 011572 
4133 011572 
4134 011576 
4135 011604 
4136 011610 
4137 
4138 011612 
4139 
4140 011616 
4141 011620 
4142 
4143 011622 
4144 011624 
4145 
4146 
4147 
4148 
4149 011626 
4150 011626 
4151 011632 
4152 011634 
4153 011636 
6154 011642 


162737 
020412 
001403 
011203 
000000 
000765 


012700 
012737 
012703 
000257 
163703 
020403 
001402 


000000 
000767 


000153 
000002 
063316 
000004 


900002 


000154 
000002 
000004 


063316 


000155 


011656 
177777 


063316 


063316 
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1152 BASIC NEG MODE O TEST : CDEST] GT 0 


BVS 3$ 
BCS 43 
3$: HALT NEGATE FAILED TO ALTER CODES PROPERLY 
BR 1$ ERROR LOOP RETURN 
4$: CMP R3,R4 ; CORRECT RESULT? 
BEQ TST153 :;BR IF YES 
5$: HALT ;NEG DELIVERED WRONG RESULT 
BR 1$ ERROR LOOP RETURN 
FEF ladadahelodabatatalalelotebabedotelolesatetalataleiahelphaialelaieiclotelelaieiaieleleieletaleleialeieleieiletebaieieieiele 
*TEST 153 BASIC *'SUB #,a4"' TEST 
WOPTTTITITITTITETITITITT TILT LILT TLL LLL LLL ELLE LLL LLL LLL 
181153: 
#153,RO0 3;LOAD RO WITH TEST NUMBER 
MOV #2 ,R4 RESULT S / B = 2 
MOV AMBUF 0 ,.R2 z:R2 POINTS TO DEST 
1$: MOV #4, (R2) INITIAL CDEST] = 4 
CCC [CLEAR FLAGS 
2$: SUB #2, AAMBUF 0 ;TEST THE SUB 
CMP R4,(R2) eh Si 
BEQ TST154 BR IF YES 
MOV (R2) ,R3 GET WAS DATA 
3$: HALT ;SUB DELIVERED WRONG RESULT 
BR 1$ [ERROR LOOP RETURN 


SL RRR ER KERR RK EERE EKER ERE EERE EERE EERE 


SeTEST 154 BASIC ''SUB a#,RN'' TEST 


ee eee a ee ee 


TST154: 


MOV #154,RO ;;LOAD RO WITH TEST NUMBER 
MOV #2, @AMBUF 0 =SRC = 
1$: MOV #4 ,R3 SINITIAL | CEST = 
CCC “SCOPE § 
2$: SUB @AMBUF 0 ,R3 :TEST THE SUB 
CMP R4,R3 ;RESULT=2? 
BEQ TST155 ::;BR IF YES 
3$: HAL T ;SUB DELIVERED WRONG RESULT 
BR 1$ sERROR LOOP RETURN 
SCARE REE REE RE RAEAREAERAEKEAERRAERRAERERRERAAERERRAEAREREREER EKER 
S*TEST 155 BASIC ‘RTS RN'’ TEST = <N:C> = 1111 
STRATA ARERARAAREAAAEAEAARAAEAAAAAEARAAEA RARER ERA AEH 
TST155: 
MOV #155,RO : {LOAD | RO WITH TEST NUMBER 
MOV SP,R5 SSAVE S 
1$: MOV R5.SP *RESET SP FOR ERROR LOOP 
MGV #6$,R3 “RTS SHOULD LOAD PC FROM (R3) 


MOV #-1,-(SP) [RTS SHOULD LOAD R3 FROM STACK 


SEQ 0078 


CQKDA-E KD11-K BASIC 
17=SEP= 


CQKDAE .P11 
4155 011646 
4156 
4157 011650 
4158 
4159 011652 
4160 011654 
4161 
4162 011656 
4163 1660 
4164 011662 
4165 011664 
4166 
4167 011666 
4168 011670 
4169 
4170 011672 
4171 011676 
4172 
4173 011700 
4174 011702 
4175 
4176 011704 
4177 011706 
4178 
4179 011710 
4180 011712 
4181 
4182 
4183 
4184 
4185 011714 
4186 011714 
4187 011720 
4188 011722 
4189 011724 
4190 011730 
4191 
4192 011732 
4193 
4194 011734 
4195 011736 
4196 
4197 011740 
4198 011742 
4199 
4200 011744 
4201 011746 
4202 
4203 
4204 
4205 
4206 011750 
4207 011750 
4208 
4209 011754 
4210 011762 

a 


000277 
000203 


000000 
000761 
020327 
001402 
000000 
000754 
020506 
001402 


000000 
000750 


012700 
0104605 


012700 


032737 
001401 


Lgcie TESTS 
09:47 


177777 


000156 


011740 


000157 
000010 063240 


9$: 


MACY11 hg 
1155 BAS! 


scc 
RTS 
HALT 
BR 
BPL 
BNE 
BVC 
BCS 
HALT 
BR 
CMP 
BEQ 
HALT 
BR 
CMP 
BEQ 
HALT 
BR 


8 7 
17=SEP=79 09:55 _  P . 


1$ 


R5,SP 
TST156 


1$ 


“RTS RN’ TEST = <N:C> = 11 


sN:C = 1777 
; TEST THE RTS = GO TO 4$ 


;RTS FAILED TO LOAD THE PC 
;LOCK ON ERROR 


su:C 2 TTT ? 


RTS ALTERED CODES - CLEARED ONE 
;LOCK ON ERROR 


;DID R3 GET LUADED FROM STACK ? 
;BR IF YES 

;RTS FAILED TO LOAD REG 

;LOCK ON ERROR 


;DID RTS POP THE STACK POINTER ? 
7;BR IF YES 


RTS FAILED TO POP SP 
;LOCK ON ERROR 


'WERARAAAGAGAAARARA 2A 2 R22 RE RRRASRSESRASE RARE LAR ER RRR SSSR RRR SSSR RR SS SD DS 


SeTEST 156 


151156: 
1$: 
2s: 
3$: 
4$: 


5$: 


BASIC ‘RTS PC'* TEST 


WEDS AASAARERASERSAASASARAAEAAR REAR REAR ERR RRR AR RAR SERRA SSR RRR SD 


#156,R0 
5 


R5.SP 
#4$,-(SP) 
PC 

1$ 

SP,R5 

TS! 157 


1$ 


;;LOAD RO WITH TEST NUMBER 
SAVE THE ORIGINAL SP 
RESET SP FOR ERROR LOOP 
;PUSH NEW PC ON STACK 
SCOPE SYNC 


TEST THE RTS - GO TO 4$ 


RTS FAILED TO LOAD PC 
;LOCK ON HARD ERROR 


;DID SP GET POPPED ? 
:;BR IF YES 


;RTS FAILED TO UPDATE SP 
;LOCK ON HARD ERROR 


WEASAAAASAARALARSSALARASRARASARSRSRRERER ERASER ARERR RRR RARER RRR RRS SS O | 


SeTEST 157 


1$1157: 


BASIC ‘SR PC,a@4#A"' TEST 


SL AAA RARER EERE RAEAEREAERAAERERAARRARARAEERARRAERHERA KEES 


;LOAD RO WITH TEST NUMBER 


MOV #157,R0 
. SBTTL — CONTROLLED BREAKPOINT’ -- BIT3 


BEQ 


#8113, a4BPTLOC 


+4 


BREAKPOINT HALT SET ?? 
IF NOT 


SEQ 0079 


7 
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CQKDA-E KD11=K BASIC LOGIC TE 
CQKDAE .P11 17=SEP=79 09:47 USER CONTROLLED BREAKPOINT -- BIT3 SEQ 0080 
4211 011764 000000 HALT ;BREAK - cia 3 CONTINUE TO RESTART 
4212 011766 010605 MOV SP RS ;SAVE ORIGINAL SP 
4213 011770 010506 1$: MOV R5,SP RESET SP FOR ERROR LOOP 
eSie 011772 000257 ccc > SCOPE SYNC 
<539 011774 006737 012004 2$: JSR PC, aa4$ ; TEST THE JSR = GO TO 4$ 
4218 012000 000000 3$: HALT ;JSR FAILED TO LOAD PC 
meth 012002 000772 BR 1$ ;LOCK ON HARD ERROR 
4221 012006 022726 012000 4$: CMP #3$,(SP)+ ;DID JSR SAVE OLD PC ON STACK ? 
os5§ 012010 001402 BEQ TST160 77BR IF YES 
4224 012012 000000 5$: HAL T ;JSR FAILED TO SAVE OLD PC 
re 012014 000765 BR 1$ ;LOCK ON HARD ERROR 
4227 LLU EERE EERE ERE EERE EEE ERR ETRE ERE Re 
4228 ;*TEST 160 BASIC ‘RTI’ TEST = N:C=0000 
4229 CDI II III III IIIDIIIDIIIOIIIOIDIUIOIUIOIIOIDIDIOIOIIOIUIUIDIIDIOIOIUIIUIDIUIOIIUI tt tt 
4230 012016 TST160: 
4231 012016 012700 000160 MOV #160,R0 ; ;LOAD RO WITH TEST NUMBER 
4232 012022 010605 MOV SP,R5 :SAVE THE SP 
4233 012024 010506 1$: MOV R5,SP TRESET THE SP FOR ERROR LOOP 
4234 012026 012746 000357 MOV #357 .-(SP) NEW PS = 357 
4235 012032 012746 012052 MOV #4$,-(SP) NEW 4$ 
4236 012036 005037 177776 CLR aAPSw MAKE Pt psul = 000 
mt 34 012042 000257 ccc MAKE N:C=0000 
rite 012044 000002 2$: RTI ;TEST THE RTI - GO TO 4$ 
4241 012046 000000 3$: HAL T yt FAILED TO LOAD PC 
ra 1 012050 000765 BR 1$ LOOP ON HARD ERROR 
4244 012052 013702 177776 4$: MOV @4PSW,R2 ;SAVE THE CPSwWJ " R2 
4245 012056 022702 000357 CMP #357,R2 ;WAS CPSWJ = 357 
x3 012062 001404 BEQ 6$ ‘BR IF YES 
4248 012064 0190237 177776 MOV R2,a4PSwW ;RESTORE THE ERROR PSW 
4249 012070 000000 5$: HALT ;RTI FAILED TO LOAD PSwW 
osen 012072 000754 BR 1$ ;LOCK ON HARD ERROR 
4252 012074 020605 6$: CMP SP,R5 ;DID SP GET UPDATED Ok ? 
$527 012076 001402 BEQ TST161 + BR IF YES 
4255 012100 000000 7$: HALT iRTI FAILED TO UPDATE THE SP 
+529 012102 000750 BR 1$ ;LOCK ON HARD ERROR 
4258 DDI III IIIIIIIIOIUIDIOIOIDIIIIIUIOIOIUIDIIDIOIDIIIOIIDIDIDIUIOIOIDIIUIDIDIDI TOO fototot tt t 
4259 :*TEST 161 BASIC 'RTI*' TEST WITH N:C=1111 
4260 CD IOI III IUIDIIIIDIDIOIIIDIIIIDIUIOIIUIDIOIUIDIDIIIUIOIOIIUIOIIUIUIOIIDIOIUIUIDIDIDIDIUICIDISIDIOE fitit 
4261 012104 TST161: 
4262 012104 012700 000161 MOV #161,R0 77;LOAD RO WITH TEST NUMBER 
4263 012110 010605 MOV SP,R5 >SAVE THE SP IN R5 
4264 012112 010506 1$: MOV R5,SP ;RESET SP FOR ERROR LOOP 
4265 012114 005046 CLR -(SP) jNEW PSW = 000000 
4266 012116 012746 012134 MOV #4$,-(SP) sNEW PC = 4$ 


CQKDA=E KD11-K_ BASIC LOGIC TESTS 


CQKDAE .P11 17=SEP=79 09:47 
4267 012122 012737 000357 
4268 012130 000240 
4269 
shh 012132 000002 
4272 012134 013702 177776 
4273 012140 022702 000000 
oSoe 012144 001404 
4276 012146 010237 177776 
4277 012152 000000 
4278 012154 000756 
4279 
4280 
4281 
4282 
4283 012156 


4284 012156 012700 000162 


4287 012166 012737 012224 
4288 000357 
4289 012202 012766 177777 
4290 012210 005037 177776 
4291 012214 000257 
4293 012216 000004 


294 
4295 012220 000000 
4296 012222 000760 


4298 012224 013702 177776 

4299 012230 022702 000357 
001404 

4302 012236 010237 177776 
000000 

4304 012244 000747 


4306 012246 022726 012220 
4307 012252 001404 


012254 010237 177776 
4310 012260 000000 
4311 012262 000740 


4313 012264 005726 
4314 012266 001404 


4316 012270 010237 177776 
4317 012274 000000 
4318 012276 000732 





177776 


000020 
000022 
177776 


D7 
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1161 BASIC ‘RTI'' TEST WITH N:C=111 


MOV #357, a4PSw sMAKE OLD PSW = 357 
NOP 


;SCOPE SYNC 
2%: RTI ; TEST THE RTI - GO TO 4$ 
4$: MOV @4PSW,R2 ;GET THE PSW 
CMP #0,R2 ;WAS CPSwJ=000 
BEQ TST162 ;7BR IF YES 


MOV R2,a4PSw 
3$: HALT 
BR 1$ 


RESTORE ERROR PSW 
RTI FAILED TO CLEAR PSW 
;LOCK ON HARD ERROR 


TERRE PERSSESLESLSSE SERS ERE E EERE R RRS RARER RRR AR ARR A ARRAS RRR ARDS OD 


T*TEST 162 BASIC ‘‘IOT’' TEST -VERIFY LOADING PSW WITH 357 


RRR ERR EEE ERRATA REREERRERE REE 


1S1162: 
MOV #162,RO ::LOAD RO WITH TEST NUMBER 
MOV SP,R5 ‘SAVE THE SP 

1$: MOV R5,SP ‘RESET SP FOR ERROR LOOP 
MOV #4$,a#20 ‘SET UP IOT VECTOR 
MOV #357, ah22 
MOV #-1,-2(SP) :10T SHOULD CHANGE -1 TO 0 
CLR aAPsw “MAKE CPSW] = 000 
CCC >SCOPE SYNC 

2$: 107 : TEST THE IOT 

3$: HALT :I0T FAILED TO LOAD PC 
BR 1$ ‘LOCK ON HARD ERROR 

4$: MOV a4PSw,R2 :GET THE PSW 
CMP #357,R2 =DID IOT LOAD A 357 ? 
BEQ 6$ “BR IF YES 
MOV R2, a4PSW :RESTORE ERROR PSW 

S$: HAL T *]OT FAILED TO LOAD PSW 
BR 1$ ‘LOCK ON HARD ERROR 

6$: CMP #3$,(SP)+ :DID IOT SAVE OLD PC ? 
BEQ 8$ ‘BR IF YES 
MOV R2,a4PSw :RESTORE ERROR PSW 

7$: HALT >1OT FAILED TO SAVE OLD PC 
BR 1$ ‘LOCK ON HARD ERROR 

8$: TST (SP)+ :DID IOT SAVE OLD PSW ? 
BEQ TST163 : BR IF YES 
MOV R2, aAPSW :RESTORE ERROR PSW 

of: HALT *IOT FAILED TO SAVE OLD PSwW 
BR 1$ “LOCK ON HARD ERR 


RRR EERE REE EERE REAR REREEEREREEEKEERRERERREREKRE REE 


SeTEST 163 BASIC "‘IOT'' TEST - VERIFY LINKAGE TO SCOPE SERVICE 


LLAMA RARE RREAERAAEAAERERRERARRAERERRARRRAEEAAAAKARAERARRARRARR ED 


SEQ 0081 


lan 7 om) 


CQKDA-E KD11=K BASIC 
CQKDAE .P11 


S288 


jeleolelelelelailea) 
WAWWG 
wr 
AMS O 


012410 
012412 


012414 
012420 
012424 


012426 
012432 
012434 


012436 
012442 


012444 
012450 
012452 


012454 
012456 


012460 
012464 


17=SEP= 


000000 
000760 
013702 
022702 
001404 
010237 
000000 
000747 
022726 
001404 
010237 
G00000 
000740 


005726 
001404 


010237 
000000 


OGIC TESTS 
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000163 
063250 
061616 
000022 


063250 


000164 
012414 


177776 


177776 
000357 


177776 


012410 


177776 


177776 


000020 


900020 
000022 
177776 
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1163 BASIC ““IOT'' TEST = VERIFY LINKAGE TO SCOPE SERVICE 


SEQ 0082 
TST163: 
MOV #163,R0 :LOAD RO WITH TEST NUMBER 
MOV SPR5 “SAVE SP 
1$: MOV R5,SP “RESET SP FOR ERROR L 
CLR aaSCOFLG STRAP SERVICE WILL com o SCOFLG 
MOV #SCOPEA,a#20  :SET UP IOT VECTOR 
CLR ar22 
CCC :SCOPE SYNC 
2$: SCOPE sTEST THE JOT 
COM aASCOFLG :SCOFLG SHOULD BECOME 000000 
BEQ 4$ “BR IF IT DID 
38: HALT :10T FAILED TO LINK TO SCOPE SERVICE 
BR 1$ ‘LOCK ON HARD ERROR 
4$: MOV R5,SP :RESET SP IN CASE OF ERROR 
SF RAAAAAAREAARERERARERERRARARRRERERAERRERRARERRARRRAARERARARRRRA HEH 
TeTEST 164 BASIC "‘IOT’' TEST -VERIFY LOADING PSW WITH 357 


5S RAAAARARRERRERAAERAAARAAAERERAEHRERARARRARARORARERAARRRKARAKRARES 


TST164: 
MOV #164,R0 ::LOAD RO WITH TEST NUMBER 
MOV SP.R5 =SAVE THE SP 
1$: MOV R5.SP [RESET SP FOR ERROR LOOP 
MOV #6$, #20 :SET UP IOT VECTOR 
MOV #357, ah22 
MOV #-1,-2(SP) :10T SHOULD CHANGE -1 TO 0 
CLR aarPSw “MAKE CPSW)] = 000 
CCC :SCOPE SYNC 
2s: 10T :TEST THE IOT 
3$: HALT :10T FAILED TO LOAD PC 
BR 1$ “LOCK ON HARD ERROR 
4$: MOV aAPSwW,R2 :GET THE PSWw | 
CMP #357,R2 ‘DID IOT LOAD A 357 ? 
BEQ 6$ “BR IF YES 
MOV R2, a4PSw :RESTORE ERROR PSW 
S$: HALT ‘IOT FAILED TO LOAD PSW 
BR 1$ ‘LOCK ON HARD ERROR 
6$: CMP #3$, (SP) + :DID IOT SAVE OLD PC ? 
BEQ 8$ “BR IF YES 
MOV R2,a4PSw :RESTORE ERROR PSW 
7$: HALT ‘1OT FAILED TO SAVE OLD PC 
BR 1$ “LOCK ON HARD ERROR 
8$: TST (SP)+ DID IOT SAVE OLD PSw ? 
BEQ 151165 ‘BR IF YES 
MOV R2, aaPSwW :RESTORE ERROR PSW 
of: HAL T >10T FAILED TO SAVE OLD PSwW 


CQKDA=E KD11=-K BASIC LOG 
CQKDAE .P11 


4379 


012466 


012470 


012520 
012522 


012524 
012530 


012532 
012536 
012540 


012542 


012544 


012572 
012574 
012576 
012604 
012612 
012616 


012620 
012622 


012624 


1¢ TESTS 
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000732 


012700 


013702 
001404 


010237 
000000 
000756 
010506 


012700 


104401 
012737 


005037 


000165 
012524 
00002 

000340 


177776 


177776 


000166 
6 
062206 


063172 


000167 


062044 
000032 


000020 
177776 


000034 


000034 
000036 


000030 


MA 84 
1164 BASIC "IOT'’ TEST -VERIFY LOADING PSW WITH 357 
BR 1$ ;LOCK ON HARD ERROR 
SLR AR AREER RARARERRRRERRARREEREREEREERERAERRRRERREEREERRERA HERS 
S*TEST 165 BASIC IOT TEST = VERIFY LOADING PSw WITH 000 
FF TAAAARAREAARAARAAARAARARARRAEARARRAARRRAARERRERERAEHERERRRHEN EE 
757165: 
“ MOV #165,R0 ::LOAD RO WITH TEST NUMBER 
MOV SPR5 = SAVE THE SP 
1$: MOV R5.SP SRESET SP FOR ERROR LOOP 
MOV #4$,a#20 :SET UP IOT VECTOR 
CLR ay22 ; 
MOV #340, a4PSW “MAKE CPSW] = 340 
ere “MAKE N:C=1111 
2$: 10T :TEST THE 10) 
4$: MOV aAPSw,R2 :GET THE CPSw] 
BEQ 6$ =BR IF CPSW] = 000 
MOV R2, aAPSW :RESTORE THE ERROR PSW 
3$: HAL T SIOT FAILED TO CLEAR THE PSw 
BR 1$ =LOCK ON HARD ERROR 
6$: MOV RS, SP :RESET THE SP BEFORE CONTINUING 
SARA RARER ERE EKER RARER EERE EERE HERE E RES 
“TEST 166 BASIC ''TRAP’' TEST = LINKAGE TO PRINT ROUTINE 
CLEARER EERE RRA EER EREE REE H KEE REREREKREEERE EE EE 
TST166: 
MOV #166,RO :LOAD RO WITH TEST NUMBER 
MOV SP,R5 SAVE THE 
1$: MOV R5.SP “RESET SP FOR ERROR |.OGP 
CLR @APRIFLG ‘INITIALIZE TEST FLAG 
CLR a4736 >SET UP THE '‘TRAP’' VECTOR 
MOV APRINA, af 34 
dae :SCOPE SYNC 
2$: TYPE :TEST THE TRAP 
MOV ASTRAP, a4 34 :SETUP TRAP VECTOR 
MOV #340, 0436 
COM aAPRIFLG :SHOULD MAKE CPRIFLG] = 000000 
BEQ TST167 ‘:BR IF IT DID 
3$: HALT : TRAP FAILED TO LINK TO PRINT SERV. 
BR 1$ “LOCK ON HARD ERROR 
CIARA RRA AEE RRA EKEERERER EERE RED 
S*TEST 167 BASIC ‘'EMT'' TEST - LINKAGE TO ERROR SERVICE 
CF AAAA AAA RRA RARAE ARERR EAR ERE EERE AEEAEEREKE RARER EES 
TST167: 
MOV #167,RO :LOAD RO WITH TEST NUMBER 
MOV SP,R5 SAVE THE 


aR 
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MOV RS ,SP RESET SP POR ERROR LOOP 


MOV MERRA, wt 30 ‘SET UP THE EMT VECTOR 
a#32 


SEQ 0083 
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CQKDAE .P11 


012646 
012652 


012654 


012656 
012662 


012664 
012666 


012670 


012714 
012720 
012722 


012724 
012730 


012732 
012734 


012736 
012744 


012752 


012776 
013002 
013004 


013010 
013014 


013016 
013020 
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005037 
000257 


104000 
005137 
001402 


000000 
000761 


000000 
000766 


012737 
012737 


063244 


063244 


000170 


061120 
000340 


063252 


063252 


061126 
000340 


000171 


061216 
000340 


063254 


177700 
063254 


000010 
000012 


000010 
000012 


000004 
000006 
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TEST = LINKAGE TO ERROR SERVICE SEQ 0084 


MACY11 30A(1052) 
1167 BASIC ‘EMT"’ 
CLR @FERRFLG 
CCC 
2$: ERROR 
COM @AVERRFLG 
BEQ TS1170 
3$: HALT 
BR 


a 


cEMT SERVICE WILL COM CERRFLGIJ 
SCOPE SYNC 


; TEST THE EMT 
DID > COM ERRFiG? 


;EMT DID NOT LINK PROPERLY 
;LOCK ON HARD ERROR 


TEAR RRR SRSRSEEE LASERS E SEES RRRRE RE RARER RRR RR RASARAR RARER RASA SSR RES ES SS 


s*TEST 170 


*ST170: 


2$: 


3$: 


4$: 


BASIC TEST OF RSVD INSTR. TRAP LINKAGE 


LL EAAAAARAAAARAARAAARRARRRERARARRERRARARRRARRARAERARERARERAAAERRERS 


#170,R0 
P,RS 


SPR 
#RSVTST,a#10 
#340,a412 


RS ,SP 
@ARSVFLG 


@ARSVFLG 
4$ 


1$ 


#RSERR , a4 10 
#340 ,a412 


RESET SP_FOR ERROR LOOP 
INITIALIZE TEST FLAG THAT WILL GET 
[COMPLEMENTED BY TRAP SERVICE 
SCOPE SYNC 


FORCE RSVD INSTR. TRAP 


; TEST FLAG SHOULD GO TO 000000 
;BR IF TRAP SPRUNG 


7RSVD INSTR. TRAP FAILED 
;LOCK ON HARD ERROR 


;SET UP RSVD INSTR TRAP VECTOR TO POINT 
3TO ERROR SERVICE ROUTINE 


SLUR AAAEEAERAARERAEREKRRAERAEREARERARARERAEEKREREAERAARERAE AED 


s*TEST 171 


1$1171: 


es: 


3$: 


COM 
BEQ 


HAL T 
BR 


BASIC TEST OF BUS TIMEOUT TRAP LINKAGE 


SLUR ARAAEE ATER AEA ERE REE RARER RARAERAERAEAARERRERRRAAAREE ERR 


#171,R0 
SP,R5 
ABETST a4 
#340 ,a46 


R5,SP 
@ABERF LG 


afi 77700 


@AFBERFLG 
TST172 


1$ 


;;LOAD RO WITH TEST NUMBER 
SAVE THE SP 
;SET UP THE BUS ERROR VECTOR 


;RESET SP_FOR ERROR LOOP 

ZINITIALIZE TEST FLAG THAT WILL GET 
:COMPLEMENTED BY TRAP SERVICE 
>SCOPE SYNC 


FORCE BUS TIMEOUT USING 80 ADDR. 


; TEST FLAG SHOULD GO TO 0000090 
:;BR IF TRAP SPRUNG 


;BUS ERROR FAILED TO SPRING TRAP 
;LOCK ON HARD ERROR 


;;LOAD RO WITH TEST NUMBER 
;SAVE THE SP 
;SET UP RSVD INSTR. TRAP VECTOR 


> 2 (Peo RRR RRR RRR ER SRR RR RRR RRR RRR RRR RRR RRR RRR RRR RR RAR RRR RRR RRR RRS SOS! 


on 
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7=SEP=79 09:47 1172  +BASIC TEST FOR ACCESSING DL11 REGISTERS SEQ 0085 
seTEST 172 BASIC TEST FOR ACCESSING DL11 REGISTERS 
FF RATA AAAAARAARAERAAAARRREARERERARAAARRAAAARRAERERARAEREKAHERER ARES 
013022 1$1172: 
013022 012700 000172 MOV #172,R0 :;LOAD RO WITH TEST NUMBER 
013026 005067 050264 CLR MBUF 0 ‘INIT STALL COUNTER 
013032 005367 050260 11$: DEC MBUF O [COUNT THE TIMER 
013036 001375 BNE 11$ “BR IF NO TIMEOUT 
013040 012737 013100 000004 MOV #3s avs ;SET UP BUS TIMEOUT VECTOR 
013046 012737 000340 000006 MOV 340, a%6- 
013054 019605 MOV yf : SAVE TH SP 
013056 010506 1$: MOV R5,SP [RESET SP FOR ERROR LOOP 
013060 012702 177560 MOV ARCSR,R2 *CR2] = STARTING DL11 ADDR. 
013064 000257 CCC :SCOPE SYNC 
013066 005722 2$: TST (R2)+ ;REFERENCE DL11 = RCSR 
013070 005722 TST (R2)+ [REFERENCE DL11 = RDBR 
013072 005722 TST (Ro) + [REFERENCE DL11 = XCSR 
013074 005712 TST (R2) SREFERENCE DL11 = X 
013076 000403 BR 4$ :GO TO NEXT TEST 
613100 005742 3$: TST =(R2) :BAD ADDRESS IN R2 
613102 000000 HALT [ONE OF DL11 ADDR'S CAUSED TIME OUT 
013104 000764 BR 1$ ‘LOCK ON HARD <RROR 
013106 012737 061224 000004 4$: MOV #BERR, a4 :SET UP BUS ERROR VECTOR TO POINT 
013114 012737 000340 000006 MOV #340, a46 =TO ERROR SERVICE ROUTINE 
CLEARER RARER RRAER EERE REREREEERERER EERE REAR KEERRE EEE EE 
SeTEST 173 BASIC TEST OF DL11 = XCSR - READY(1) 
STARR RE EERE ERERREEER EEE ERR ERRAEEERAERRERE RE REE ES 
013122 TST173: 
013122 012700 000173 MOV #173,RO :LOAD RO wITH TEST NUMBER 
013126 012702 177564 MOV #XCSR,R2 “BEST ADDR = XCSR 
013132 012704 000200 MOV #200,R4 “RESULT S / B = 200 
013136 005012 1$: CLR (R2) =CLEAR CDEST] 
013140 005001 CLR R1 :SET UP TIMEOUT COUNTER 
013142 000257 CCC “SCOPE SYNC 
013144 020412 2$: CMP R4, (R2) :TEST READY BIT - IT SHOULD BE SET 
013146 001405 BEG TST174 -:BR IF IT WA 
013150 005301 DEC R1 * TICK-TOCK GOES THE TIMER 
013152 001374 BNE 2$ ‘BR IF NOT A TIMECUT 
013154 011203 MOV (RZ) .R3 :GET THE WAS DATA 
013156 000000 3$- HALT ‘READY BIT IN XCSR FAILED ON A (0) 
013160 000766 BR 1$ SLOCK ON HARD ERROR 
CE REAR R ERE ERRAE ERE RREERREEERA AER AEAAERERREEERERERRAR EERE R ED 
T*TEST 1746 BASIC TEST OF DL11 - XCSR - MAINT BIT (0) 
DPR REAR E REE RAE ERRERR EKER Ee 
013162 7$11746: 
013162 012700 000174 my #174,R0 :LOAD RO WITH TEST NUMBE R 
013166 012702 177564 MOV AXCSR,R2 “BEST ADDR = XCSR 
013172 0127046 000200 MOV #200,R4 “RESULT S / B = 200 
013176 005012 1$: CLR (R2) CLEAR MAINT. BIT 
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013200 
013202 


013212 


013214 


013236 
013240 
013242 


013244 
013246 


013250 


013326 


17=SEP= 
000257 
020412 
001403 
011203 
000000 


001403 
011203 
000000 
000770 


012700 


012762 
005001 
112462 
105712 
100404 
005301 
001374 
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000175 
177564 
000204 
000004 


000176 
177560 
000002 


000004 


, 
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174 BASIC TEST OF DL11 = XCSR = MAINT BIT (0) 


ccc ; SCOPE SYNC 
e$: CMP R4,(R2) TEST MAINT(O) 

BEQ TST175 ;;BR IF MAINT BIT CLEAR 

MOV (R2) ,R3 ;GET THE WAS DATA 
3$: HALT ; CAN'T CLEAR MAINT BIT 

BR 1$ ;LOCK ON HARD ERROR 
SF RAAAAARRAAAAAAERARRARAARAERARANTERRARAAARARAARAEHREHKERAAARARAHS 
s*TEST 175 BASIC TEST OF DL11 XCSR = MAINT BIT = 1 
Ly eee ERR RRR R EERE RRR NA REET EERE EERE ERE EERE RRR RR ERENT ERTS 
1$1175: 

MOV #175,R0 ;;LOAD RO WITH x NUMBER 

MOV #XCSR,R2 ;DEST ADDR = XC 

MOV #204 ,R4 sRESULT S / B = B06 
1$: MOV #4,(R2) SET THE MAINT. BIT 

ccc ; SCOPE SYNC 
2$: CMP R4,(R2) ; TEST MAINT.(1) 

BEQ TST176 ;2BR IF IT WAS 

MOV (R2) ,R3 :GET THE WAS DATA 
3$: HAL T CAN'T SET MAINT BIT IN XCSR 

BR 1$ ;LOCK O HARD ERROR 
PLR ER EERE EERE EERE ee 
:*TEST 176 BASIC DL11 OUT / IN ECHO TEST (MAINT MODE) 


THIS ROUTINE USES THE MAINTENANCE MODE FEATURE OF THE DL11 TO 

; TURN AROUND A STRING OF 8 CHARACTERS TO THE DL11. THIS STRING CONSISTS 
;OF ALTERNATING NULL / DELETE CHARS WHICH ARE NON PRINTING. THE 8 CHARS 
;ARE OUTPUT THEN READ BACK INTO A CORE BUFFER AND THEN THE INPUT AND 
;OUTPUT CORE BUFFERS ARE CHECKED FOR EQUIVALENCE. IF AN ERROR IS DET- 
;ECTED DURING THE COMPARISON THE ROUTINE HALTS WITH THE WAS AND S / B 
DATA IN R3 AND R4 RESPECTFULLY. A TIMER IS EMPLOYED TO PREVENT THE 
TEST FROM HANGING IF RECEIVER DONE DOES NOT RESPOND. 


MARS AASRASLARASLASLASLASARERAASASRARR SESSA RRRARARRRRRAR RRA RARER SDSS SD: 


151176: 
MOV #176,RO :LOAD RO WITH TEST NUMBER 

6$: MOV ARCSR,R2 “Ro POINTS TO DL11 - START ADDR 
TSTB —- 2(R2) REFERENCE DL11 INPUT DATA BUFFER TWICE 
TSTB —s- 2(R2) *TO FLUSH RCVR ‘DONE’ BIT 
MOV AIBUF .R3 ‘R3 POINTS TO CORE INPUT BUFFER 
MOV HOBUF © RG *R4 POINTS TO CORE OUTPUT BUFFER 
MOV #10,R5 *R5 WILL COUNT 8 CHARS OUTPUT 
MOV #4,4(R2) > TURN ON MAINT MODE 

1$: CLR R1 ;R1 USED AS TIMEOUT COUNTER 
MOVB (R4)+,6(R2) LOAD OUTPUT BUFFER IN DL11 

2%: TSTB. ss (R2) RECEIVER DONE SET ? 
BM] z$ :BR IF YES 
DEC RI =COUNT THE TIMER 
BNE 2$ “BR IF NO TIMEQUT 


SEQ 0086 





EE RL NE ke PF ee 9 
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013330 000000 HALT 3DL11 FAILED TO RESPOND IN TIME 
013332 000750 BR 6$ ;LOCK ON HARD ERROR 


116223 : 2(R2),(R3)+ READ THE g Ae INPUT BUFFER INTO CORE 
R5 ; COUNT ONE CHAR 
[BR IF NOT DONE 8 CHARS 


; TURN OFF MAINT. MODE 


RESET 
RESET POINTE 
012704 . #OBUF RS ;RESET OUTBUF POINTER 


122324 : (R3)+,(R4)+ 3 INPUT = OUTPUT ?? 
001003 5$ ; 


: NOT 
R5 ; COUNT ONE CHECKED 
4$ BR UNTIL 8 DONE 
013374 CITST :GO TO NEXT TEST 


013376 : -(R3) ,R3 7WAS DATA _IN R3 [BITS 7:0) 
013400 (RS) RS 7S / B DATA IN RG [BITS 7:0] 
177400 #177400,R3 + STRIP OFF BITS <15:08> 


177400 #177400,R4 
SRECEIVED DATA oll EQUAL TO QUTPUT DATA 
6$ ;LOCK ON HARD ERR 
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oo 


sssssssss 
EEFERELEE 


RESNEKSRS 


013556 


013562 
013562 
013564 
013570 
013574 


013576 
013600 


013602 


una 
~r 


17=SEP= 


010037 


000004 
012700 
013701 
000261 


103001 
000401 


104005 


000004 
012700 
013701 
000241 
103001 


104005 


001124 


000177 
013576 


000200 
013620 


001040 
165322 


001006 
001110 


MACY11 30A(1052) 


7176 


CITST: 


3$: 


K 7 
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BASIC DL11 OUT / IN ECHO TEST (MAINT MODE) 


DOOQOO00000000000000000 0000000000000 
3///1/111///// COMPREHENSIVE INSTRUCTION TESTS////A////////111011717/7 
DOOOO0000000000000000000000000000 000000000000 


#SSCOPE , #20 :SET UP IOT VECTOR 
#SERROR,a#30 ;SET UP EMT VECTOR 
#340,a432 

TRAP, a#34 :SET UP TRAP VECTOR 


ASPWRDN , 0424 ;SET UP POWER FAIL VECTOR 


#340,a426 
NVM :DO NOT SIZE BIT SET? 
$ 7BR_IF NOT ~ USE HARDWARE SWITCH REG 
MSSWREG,@ASWR = ==;USE APT SWITCH REG. 
#SW12,aSWR ; INHIBIT PRINTING INTRO. I.D. MESSAGE? 
1$ :BR IF YES 
aFONCE ;FIRST TIME INTO ‘CIT’' TESTS ? 
1$ :BR IF NOT = PRINT ID ONLY ONCE 
@4ONCE SET FLAG TO INHIBIT PRINTING AGAIN 
IDENTIFY THIS PROGRAM 


SADDR OF THE ID MESSAGE 
aA4PSW [SET CPU PRIORITY TO LEVEL 000 
#TSTO,@#$SLPADR : INITIALIZE SCOPE LOOP RETURN 
#40 ,a@ASTIMES TERATE ON BIT phe A be TIMES 
RO, @A#STESTN = PREVENT MISSED TEST ERROR ON 
FIRST SCOPE CALL 


= 


5 LAA REE KR EEEEEEREREKE RRA REE EEKR EEE 


z*TEST 177 


5 REECE RRR RK REE AER ARERR KE 


1$1177: 


2$: 


3$: 


ERROR 


BCC TEST WITH C=1 


:CALL_ THE SCOPE hig UTILITY 


#177,RO :;LOAD RO WITH TEST NUMBER 

a4#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
:MAKE C=1 

3$ TEST THE BCC, IT SHOULDN'T BR 

TST200 ::GO TO SCOPE EXIT 


5 ;BCC FAILED 


Wnt eee eee eee REREESERARESESERE SARA RA SAR RR RARER SRR AR RASA RRS SSD | 


**TEST 200 


Wet SSASASARAASALASALARLASASSREAS EASES RS SAAR RS SRRRA RRR SR AS ASSL SS SO | 


T$1200: 


2s: 


3$: 


SCOPE 


BCC TEST WITH C=0 


: CALL THE SCOPE LOOP UTILITY 


#200,R0 LOAD RO WITH TEST NUMBER 

a42$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
:MAKE C= 

TST201 3:TEST THE BCC-IT SHOULD BR 

5 ;BCC FAILED 
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013702 
013706 
013710 
013712 
013714 
013720 
013722 


013724 


013726 


013740 
013742 


013746 
013750 


va 
3 


17=9GP= 


0 

012702 
000277 
103004 
013703 
020304 
001401 


104001 


012702 
000277 
000401 
104005 
013703 
020304 
001401 


104001 


000004 
012700 
013701 
005004 
012702 
000257 
103404 


000201 
013650 
000017 
177776 


177776 


177776 


177776 


000203 
013750 


177776 
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VERIFY NO BRANCH MICROROUTINE DOES NOT CLR FLAGS 


Wen RARAAARAARALASLAASLARSRARARASASASRARRREASRARRRRRARRRRRRAR RRA RRR S SE S| 


t*TEST 201 


TST201: 


2$: 


3$: 


SCOPE 


ERROR 


VERIFY NO BRANCH MICROROUTINE DOES NOT CLR FLAGS 


FF RARER RAARRRRAERAARERRRRRARHREEAARAARRRRARRAEREAEAAEARERED 


#PSW,R2 


3$ 

a4PSW RS 
R3,R4 
TST202 

1 


CALL THE SCOPF LOOP UTILITY 
:;LOAD RO WITH TEST NUMBER 
Oe Pou WITH TEST INSTRUCTION WORD 
DEST = PSW FOR ERROR CALL 
MAKE N:C = 1111 
TEST THE BCC-IT SHOULDN'T BR 
3GET WAS FLAGS 
iN: C = 1111? 
;;BR IF YES 


NO BRANCH MICROROUTINE ALTERED CODES 


WRORAASAAASA£ A222 AAR SESRSRRSRRRARRAR ERASER AAAS ESSER R SAAR A SALAS E SS SS 


;*TEST 202 


1§1202: 


2s: 
3$: 
4$: 


5$: 


ERROR 


VERIFY BRANCH MICROROUTINE DCES NOT CLR FLAGS 


MALS AAAS ASAAESSALESSASESARRRRERRRE RRS AARARARE RASA RAR RAR RRR RASS SS S| 


#202,R0 
a#2$,R1 
#17,R4 

#PSW,R2 


' 4$ 


5 
a4PSwW,R3 
R3,R4 
TST203 


1 


: CALL THE SCOPE LOOP UTILITY 

;LOAD RO WITH TEST NUMBER 

:LOAD id WITH TEST INSTRUCTION WORD 
;DEST = PSW FOR ERROR CALL 
MAKE N:C = 11117 
;TEST THE BR 
;JUST IN CASE THE BR DIDN*T WORK 
ae THE FLAGS 

N:C = 1111? 

:;BR IF YES 

;BRANCH MICROROUTINE ALTERED CODES 


CL RRR RE REREAD 


i*TEST 203 


T$1203: 


23: 


VERIFY NO BRANCH MICROROUTINE DOES NOT SET FLAGS 


'WEORARASALLAASLAAL A 2 2A SS ERASERS ESASSE SESE SR SAS SARS RRR RAR SSA SARS SD SD | 


#203,R0 
a#2$,R1 
R4 

#PSW,R2 


3$ 


# CALL THE SCOPE LOOP UTILITY 
;LOAD RO WITH {EST NUMBER 

“LOAD R1 WITH TEST INSTRUCTION WORD 

iPSwW S/B = 0 

:DEST = PSwW FOR ERROR CALL 


MAKE N:C = 0000 
TEST THE BCS-IT SHOULDN'T BR 


| 
| 
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013752 


014010 
014012 
014016 
014020 


014022 


014024 


17-SEP-79 09:47 


013703 
03 


000004 
012700 
013701 


005004 
012702 
000257 
000401 
104005 
013703 
005703 
001401 


104001 


003401 
104005 


177776 


000204 
014006 


177776 


177776 


000205 
014040 


000206 
014064 


7 
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7203 VERIFY NO BRANCH MICROROUTINE DOES NOT SET FLAGS 


MOV a4PSw,R3 are FLAGS 
TST R3 N:C = 0000 
BEQ TST204 + :BR IF YES 
3$: ERROR 1 ;NO BRANCH MICROROUTINE=ALTERED CODES 
DDB ISISIIIOISISIIOISIDIOIISIDIIIUIUIOIISIOIOIIOIDIOIOISOI SII IIIT ISITE TTI IIE 
s*TEST 204 VERIFY BRANCH MICROROUTINE DOES NOT SET FLAGS 
FLARE AREER EKER EERE ERERERERERERERE REAR EEE 
TST204: 
SCOPE = CALL THE SCOPE LOOP UTILITY 
MOV #204 ,R0 LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 <i OAD R1 WITH TEST INSTRUCTION WORD 
CLR RG =PSW S/B = 
MOV #PSW,R2 DEST = PSW FOR ERROR CALL 
ccc sMAKE N:C = 0000 
2$: BR 4$ ;TEST THE BR 
3$: ERROR 5 : JUST IN CASE THE BR DIDN'T WORK 
4$: MOV aAPSW,R3 ne FLAGS 
TST R3 N:C = 0000 
BEQ TST205 NBR IF YES 
5$: ERROR 1 ;BRANCH MICROROUTINE ALTERED CODES. 
ce 
:*TEST 205 BLE TEST WITH Z = 0, AND N,V = 00 
MeASBSAASBASASAALA£LA SES SESS ESSERE SES SES SESE SSSR RRR ASRS ERE RAR SRR RSS SSS SD 
781205: 
SCOPE = CALL THE SCOPE ‘ig UTILITY 
MOV #205,R0 LOAD RO WITH TEST NUMBER 
MOV aF2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
CCE ;CLEAR FLAGS 
2$: BLE 3$ : TEST THE BLE-IT SHOULDN'T BR 
BR TST206 3:GO TO SCOPE EXIT 
3$: ERROR 5 ;BLE FAILED 
Ce 
:*TEST 206 BLE TEST WITH Z = 1 AND N,V = 
MeOseSeeeeSeSeaaSaSSLES ESSER SESE SASSER RSE ERR RRR SSR RR RSRRRR ESSE SSS SE SO 
151206: 
SCOPE ; = CALL THE SCOPE Lor UTILITY 
MOV #206,R0 >;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 * LOAD R1 WITH TEST INSTRUCTION WORD 
CCC : CLEAR FLAGS 
SEZ SET zZ=1 
es: 
BLE TST207 77 TEST THE BLE-IT SHOULD BR 


3$: ERROR 5 BLE FAILED 


SEQ 0090 
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014070 


014130 
014130 


014132 


014150 


014152 
014154 


014156 


014172 
014174 


me 
Pat 
3 


17-S 


000004 
012700 
013701 
000257 
000262 
003401 
104005 


000004 
012700 
013701 
000257 


101401 


000210 
014130 


000211 


014152 


000212 
014174 
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7206 BLE TEST WITH Z = 1 AND N,V = 00 


JL ARRAARERERRERERRAERARRE AERA RERRAREERERERRARRRRRERARRRE REED 


s*TEST 207 BLE TEST WITH Z = 0 AND N,V = 01 


SAAR AEARKE AERA RREERERRERERERERRRERREEAARRARR EEE 


TST207: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #207,R0 :;LOAD RO WITH TEST NUMBER 
MOV aF2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
cCcC MAKE FLAGS 
SEV MAKE Z = 0 AND N,V = 01 
2$: 
BLE TST210 :i TEST THE BLE-IT SHOULD BR 
3$: ERROR 5 ;BLE FAILED 
Sh er rag alan coon nag tte tea nt tage pnt Sauna pl Salaniat eatatam 
s*TEST 210 BLE TEST WITH Z = 0 AND N,V = 10 


SERRE 


1§1210: 


SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #210,R0 +; LOAD RO WITH TEST NUMBER 
MOV a¥2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
CCC ee FLAGS 
SEN [MAKE = 0 AND N,V = 10 
2s: 
BLE TST211 3: TEST THE BLE-IT SHOULD BR 
3$: ERROR 5 ;BLE FAILED 
a ee ee ee 
s*TEST 2171 BLE TEST WITH Z = O AND N,V = 11 
SL ARR RRR KEE REE REE EEREKEKER EEE 
Totes 
SCOPE ;CALL THE “ee LOOP UTILITY 
MOV #211,R0 + LOAD RO WITH TEST NUMBER 
MOV a2$,R1 ; LOAD " WITH TEST INSTRUCTION WORD 
CCC ;CLEAR FLAGS 
272 SMAKE Z = 0 AND N,V = 11 
2s: BLE 3$ ; TEST THE BLE-IT SHOULDN'T BR 
BR TST212 3:GO TO SCOPE EXIT 
3$: ERROR 5 :BLE FAILED 
CLARE EAR ERE EERE REREAD 
s*TEST 212 BLOS TEST WITH Z,C = 00 
LL REAR REE RE RRR EKER EERE RRR EERE EERE ERE 
TSTf212: 
SCOPE .CALL THE SCOPE LOOP UTILITY 
MOV #212,R0 *:LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
ccc *MAKE Z7.C = 00 
2$: BLOS 3$ ; TEST THE BLOS-iT SHOULDN'T BR 


SEQ 0091 


8B 8 
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CQKDAE .P 17-SEP- " 12 BLOS TEST WITH 7,C = 00 SEQ 0092 
pre 014176 000401 BR TST213 3:G0 TO SCOPE EXIT 
$52? 014200 104005 3$: ERROR 5 ;BLOS FAILED 
4855 LURE AAR AREA AERA AEA ARERAEERAREREREARERERERRERER ERR A HERA A RT 
4856 eTEST 213 BLOS TEST WITH Z,C = 01 
4857 LEAR RARE RRA REA AE REEER AREER REREREEERERRARERRERRARERERER ERE E EEE 
4858 014202 TST213: 
4859 014202 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
4860 014206 012700 000213 MOV #213,R0 ;Z;LOAD RO WITH TEST NUMBER 
4861 014210 013701 014220 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
4862 014214 000257 CCC eee bay 
reo 014216 000261 SEC SMAKE 7,C = 01 
4865 014220 es: 
piv. 014220 101401 BLOS TST214 7: TES! THE BLOS-IT SHOULD BR 
rt + | 014222 104005 3$: ERROR 5 ;BLOS FAILED 
4870 LEAR EEE EEE EE ERR ERE EERE EERE ARERR ERE REE ERR EE 
4871 S*TEST 214 BLOS TEST WITH Z,C = 10 
4872 LRA REE RRR EERE REAR ERE REE REAR A RARER ED 
4873 014224 TST214: 
4874 014224 000004 SCOPE = CALL THE SCOPE LOOP UTILITY 
4875 014226 012700 000214 MOV #214,R0 ;LOAD RO WITH TEST NUMBER 
4876 014232 013701 014242 MOV a72$.R1 “(OAD R1 WITH TEST INSTRUCTION WORD 
4877 014236 000257 ccc 7 CLEAR — 
rr sh 4 914240 000264 SEZ “MAKE zZ.C = 10 
4880 014242 2$: 
ry 4 014242 101401 BLOS TST215 3: TEST THE BLOS-IT SHOULD BR 
rr +4 014244 104005 3$: ERROR 5 ;BLOS FAILED 
4885 | ea tg aa iar ht halaman nla + anata met a nari tain 
4886 s*TEST 215 BLOS TEST WITH Z,C = 11 
4887 RRR REE RK ERE 
4888 014246 151215: 
4889 014246 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
4890 014250 012700 000215 MOV #215,RO0 >; LOAD RO WITH TEST NUMBER 
4891 014254 013701 014264 MOV af2$,R1 > LOAD ¥ WITH TEST INSTRUCTION WORD 
4892 014260 000257 CCC ee FLAGS 
4893 014262 000265 265 MAKE 7,C = 11 
4894 
4895 014264 2$: 
rs 014264 101401 BLOS TST216 7: TEST THE BLOS-IT SHOULD BR 
rr ta 014266 104005 3$: ERROR 5 ;BLOS FAILED 
4900 CRO III IIIIIIIOIIOIUIOIIOIIDIOIUIOIIDIOIUIOISIOIIOIUIOIUIOIUIDIUIIO IDO On Ri tot ttt t 
4901 ;*TEST 216 SXT MODE O TEST WITH N = 0 AND C = 1 
4902 DD RR IRR RRR REE ER REE 
4903 014270 TST216: 
4904 014270 000004 SCOPE ;CALL THE SCOPE . oo UTILITY 
4905 014272 012700 000216 MOV #216,RO0 > LOAD RO WITH TEST NUMBER 
4906 014276 013701 014314 MOV af 2$,R) ;LOAD R1 WITH TEST INSTRUCTION WORD 
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005004 R4 : 
4908 014306 012703 177777 MOV #-1,R3 :INITAL DEST. UP = 177777 
4909 014310 000257 CCC CLEAR CODES 
4910 014312 000263 263 ZN:C = 0011 


4912 014314 006703 2$: SXT R3 ;TEST THE SxXT 


4914 014316 100403 BM! 3$ 
4915 014320 001002 BNE 3$ ;DID SXT MAKE N:C = 0101? 
4916 014322 102401 BVS $$ 
peat 014324 103401 BCS 4$ 


4919 014326 104002 3$: ERROR 2 3ST FAILED TO ALTER CODES PROPERLY 


4921 014330 005703 4$: TST R3 DID RESULT = 0? 
4922 014332 001401 BEQ TST217 ;;BR IF IT DID 


4924 014334 104002 5$: ERROR 2 ;SXT DELIVERED WRONG RESULT TO R3 


4926 SDR RRR RRR RTOS RRO RS IRR ER RRR RRR Rh tht ht 
4927 ;*TEST 217 SXT MODE 0 TEST WITH N = 0 AND C = 0 

4928 SR BRR BR BR RS TR RTT ROTTS ROTOR TOTTORI TOR TOR TTR TR TR tt tt 
4929 014336 TST217: 

4930 014336 000004 SCOPE :CALL_THE SCOPE LOOP UTILITY 

4931 014340 012700 000217 MOV #217,R0 >;LOAD RO WITH TEST NUMBER 

4932 014344 013701 014372 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
4933 .SBTTL USER CONTROLLED BREAKPOINT =~ BIT4 

4934 014350 032737 000020 063240 BIT he -@ABPTLOC ;BREAKPOINT HALT SET ?? 

4935 014356 001401 BEQ +4 ;BR_IF NOT 

ae 014360 000000 HALT SBREAK - DEPRESS CONTINUE TO RESTART 


4938 014362 005004 CLR RG RESULT S / B = 0 
4939 014364 012703 177777 MOV #-1,R3 INITIAL DEST OP = 177777 
rte 014370 000257 ccc >CLEAR N:C 


4942 014372 006703 2$: SXT R3 ety THE SXT 
4943 014374 103001 BCC TST220 ;;BR IF ‘'C’' STILL CLEAR 


4945 014376 104002 3$: ERROR 2 SMT AFFECTED ‘'C’’ BIT 


4947 DIS UUOOUIOIIOIIIIIIIDIIIOIIIIISISIOIIIOIIIUIIOIIIOIUIUIOIDIUIUIIIOIIUIUIOIOUODR ER itt ttt 
4948 :*TEST 220 SXT MODE 0 TEST WITH N = 1 AND C = 1 

4969 CDI III IDIIIIIOIIOIIIIIUIUIIIOIUIUIOIIUIOUII IDR DR Ott Rint ttt 
4950 014400 TST220: 

4951 014400 000004 SCOPE 7 CALL THE SCOPE LOOP UTILITY 

4952 014402 012700 000220 MOV #220,R0 ;LOAD RO WITH TEST NUMBER 

4953 014406 013701 014422 MOV a4 2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
4954 014412 012704 177777 MOV #-1,R4 RESULT S / B = 177777 

4955 014416 005003 CLR R3 INITIAL DEST OP = 0 

4956 014420 000277 scc MAKE N:C = 1111 


mn 014422 006703 2$: SxT R3 : TEST THE SXT 

4960 014424 100003 BPL 3$ 

4961 014426 001402 BEQ 3$ iN:C = 1001? 
014430 102401 
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SXT MODE 0 TEST WITH N = 1 AND C SEQ 0094 














aur 014432 103401 BCS 4$ 

rhs 34 014434 104002 3$: ERROR 2 ;SXT FAILED TO ALTER CODES PROPERLY 

4967 014436 010305 4$: MOV R3,R5 ;GET RESULT 

4968 014440 005105 COM R5 ;COMPLEMENT IT=SHOULD GO TO 0 

rp 24 014442 001401 ' BEQ TST221 ;;BR IF RESULT OF SXT = 1 

aye 014444 104002 5$: ERROR 2 ;SXT DELIVERED WRONG RESULT. 

207% LER E RARER EERE REE ARE RARER AAA 

4974 P*TEST 221 SXT MODE 0 TEST WITH N = 1 AND C = 0 

4975 LURE EERE REAR REE REE E RARER EERE EERE RARER ARERR ERED 

4976 014446 TST221: 

4977 014446 000004 SCOPE 7 CALL THE SCOPE LOOP UTILITY 

4978 014450 012700 000221 MOV #221,R0 ;LOAD RO WITH TEST NUMBER 

4979 014454 013701 014472 MOV a#2$,R1 : LOAD R1 WITH TEST  eltalainae wORD 

4980 014460 012704 177777 MOV #-1,R4 sRESULT S / B = 177777 

4981 014464 005003 CLR R3 ; INITIAL DEST OP = 0 

4982 014466 000257 CCC :CLEAR FLAGS 
rhe sy 014470 000276 276 ;MAKE N:C = 1110 | 
4985 014472 006703 2$: SXT R3 ig THE SXT 

rhs] 014474 103001 BCC TST222 33BR IF ‘'C'' UNAFFECTED 

4988 014476 104002 3$: ERROR 2 ;SXT SET ‘'C’' BIT 











4990 DIDS UISIEIOIOIIOIIIIUIIIUISIUIIIUIDIOIDISIIUIOIUIIIUIDIDIDIUIDIIDIIIDIUIIOIIUDIIDUIDIUIDIUIDEIDIIDI Ett 
4991 i*TEST 222 SXT MODE 1 AND 2 TEST WITH N = 0 AND C = 1 

4992 DISUSE IISIOIIOISUIIOISIOIIOISIOIDIOIIOIIOIDIOIIUIIUIUIOIUIUIDIDIIIOIIUIIDIUDIDIUIUOIIODIDINII I 
4993 014500 TST222: 

4994 014500 000004 SCOPE 7 CALL THE SCOPE LOOP UTILITY 
4995 014502 012700 000222 MOV #222,RO0 ;LOAD RO WITH TEST NUMBER 

4996 014506 013701 014530 MOV a#2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
4997 014512 012702 063316 MOV #MBUFO,R2 R2 tee TO DEST OP 

4998 014516 005004 CLR R4 sRESULT S / B = 0 

4999 014520 012712 177777 MOV #-1,(R2) INITIAL [DEST] = 177777 

5000 014524 000257 CCC >CLEAR CODES 

rsd 014526 000263 263 [MAKE N:C = 0011 





5003 014530 006712 e$: SXT (R2) TEST THE SXT - DMI 


5005 014532 100403 BM! 3$ 
5006 014534 001002 BNE 3$ 3N:C = 0101 








5007 014536 102401 BVS 3$ 
ae 014540 103401 BCS 4$ 
5010 014542 104001 3$: ERROR 1 ;SXT FAILED TO ALTER CODES PROPERLY 










5011 
5012 014544 005712 4$: TST (R2) DID RESULT = 0? 
5013 014546 001401 BEQ 11$ :BR IF YES 





ay 014550 104001 5$: ERROR 1 ;SXT SHOULD HAVE ZEROED CDESTJ 
5017 014552 012702 063316 11$: MOV AMBUFO,R2 DEST ADDR = MBUFO 
014556 013701 014572 MOV 041 2$,R1 [LOAD R1 WITH TEST INSTR WORD 











on 
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SXT MODE 1 AND 2 TEST WITH N = O AND C = 7 SEQ 0095 
MOV #-71,(R2) sINITIAL CDESTJ = 177777 
CCC CLEAR CODES 
263 sMAK E N:C = 0011 
12$: SxT (R2)+ ; TEST SXT = DM2 
BM! 7$ sN:C = 0101 ? 
BNE 7$ 
BVS 7$ 
BCS 6$ 
7$: ERROR 1 7SMT FAILED TO ALTER CODES PROPERLY 
6$: TST @AMBUF 0 ;DID RESULT GET ZEROED ? 
BEQ 8$ ;BR IF YES 
9$: ERROR 1 :SXT FAILED TO ZERO CDESTJ 
8$: CMP R2,AMBUF 0+2 ;WAS IT REALLY MODE 2 ? 
BEQ TST223 >sOr If Yes 
ERROR 1 ;SXT FAILED TO AUTO INCREMENT 
CLARA AEREKERERAREKEREREREKRREREKERRERRERRERERRERARAERARRRRERRE RRS 
:eTEST 223 SXT MODE 1 TEST WITH N = 0 AND C = 0 
CS AAEAARARAEAERRKEREERAERHERKEAREERAARRERRRARRAKERARRARRARREARREAERRRERRRR ED 
TST223: 
SCOPE : CALL THE SCOPE LOOP UTILITY 
MOV #223,R0 sLOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 SRESULT $/ + = of 
MOV AMBUFO,R2 *R2 POINTS TO DEST OP 
MOV #-1,(R2) : INITIAL, fpesra = 177777 
CCC SCLEAR ' _ 
2s: SxXT (R2) ;TEST THE SXT 
BCC TST224 + :BR IF ‘'C’* UNDISTURBED 
3$: ERROR 1 sSXT SET THE ‘'C'’ BIT 
SEAR REET AERA RERAERRREEKEREEKHEERERRRREE EEE 
i*TEST 224 SXT MODE 1 TEST WITH N = 1 AND C = 1 
CLARA EEE EEREE EERE 
TST224: 
SCOPE ;CALL THE SCOPE hog UTILITY 
MOV #224,R0 *;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV M-1 RG ‘RESULT S / B = 177777 
MOV AMBUFO,R2 ;R2 POINTS TO DEST OP 
CLR (R2) os sag 7 = 0 
scc MAKE N:C = 11117 
2$: SxXT (R2) :TEST THE SXT 
BPL 3$ 


BEQ 3$ iN:C = 1001? 
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CQKDAE .P11 17=SEP=79 09:47 SXT MODE 1 TEST WITH N = 1 AND SEQ 0095 
5075 014716 102401 BVS 3$ 
rte 014720 103401 BCS 4% 
rise 014722 104001 3$: FRROR 1 ;SXT FAILED TO ALTER CODES PROPERLY 
5080 014724 021204 4$: CMP (R2) ,RS sRESULT = 177777? 
3081 014726 001401 BEQ TST225 :;BR IF YES 
pala 014730 1046001 5$: ERROR 1 ;SXT DELIVERED WRONG RESULT 
5085 DUI IIIT IIIT III IOI IOI RE Ett tn tt 
5086 Z*TEST 225 SXT MODE 1 TEST WITH N = 1 AND C = 0 
5087 PLEURA REE REE REE EERE EERE EERE REE EEE Ee 
5088 014732 TST225: 
5089 014732 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
5090 014734 012700 000225 MOV #225,R0 ; ;LOAD RO WITH TEST NUMBER 
5091 014740 013701 014762 MOV a#2$,Ri ;LOAD R1 WITH TEST INSTRUCTION WORD 
5092 014744 012704 177777 MOV #-1,R4 sRESULT S / B = 177777 
5093 01475C 012702 063316 MOV AMBUFO,R2 ;R2 POINTS TO DEST OP 
5094 014754 005012 CLR (R2) : INITIAL CDEST] = 0 
5095 014756 000257 CCC ;CLEAR FLAGS 
saa 014760 000276 276 sMAKE N:C = 1110 
5098 014762 006712 2s: SXT (R2) i TEST THE SXT 
a $4 014764 103001 BCC TST226 77BR IF ''C'’ UNAFFECTED 
31a 0147606 104001 3$: ERROR 1 sSXT SET THE ‘'C'' BIT 
5103 DOI IOIOIIOIOIIIOIIOIOIIIOIIUIIISIOIIOIIIIUIIIUIOIUIOIUIOIUIIIOIIOIIIIUIUIOIIIOIIUIUIUIIOIUIDIOIOI Itt 
5104 s*TEST 226 SWAB MODE 0 TEST WITH POS. RESULT 
5105 DDR RII III III IIOIIUIOIIOIIIUIIIOI III TRIS Rh tt et 
5106 014770 TST226: 
5107 014770 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
5108 014772 012700 000226 MOV #226,R0 ;;LOAD RO WITH TEST NUMBER 
5109 014776 013701 015016 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
5110 015002 012704 177400 MOV #177400,R4 ;RESULT S / B = 177400 
5111 015006 012703 000377 MOV #377 ,R3 sINITIAL DEST OP = 377 
5112 015012 000257 CCC i CLEAR FLAGS 
AE 015014 000273 273 7MAKE N:C = 1011 
hes 015016 000303 cs: SWAB R3 ;TEST THE SWAB 
5117 015020 100403 BM! 3$ 
5118 015022 001002 BNE 3$ iN:C = 0100 
5119 015024 102401 BVS 3$ 
Rist 015026 103001 BCC 4$ 
2156 015030 104002 3$: tRROR 2 ;SWAB FAILED TO ALTER CODES PROPERLY 
5124 015032 020403 4$: CMP R4,R3 ; CORRECT RESULT? 
gis? 015034 001401 BEQ TST 227 37BR IF YES 
‘5, 015036 104002 5$: ERROR 2 ;SWAB DELIVERED WRONG RESULT 
5129 LLANE ERROR ERE RRR RRR EEE ERR ARERR EE 
5130 seTEST 227 SWAB MODE O TEST WITH NEG. RESULT 
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CQKDAE .P11 ~SEP=79 09:47 1227 SWAB MODE 0 TEST WITH NEG. RESULT SEQ 0097 
$131 SLUR ERE RRR REE AEE RET ERE RR ERE TERT Re 
5132 015040 TST22?7: 

5133 0150460 000004 SCOPE # CALL THE SCOPE LOOP UTILITY 

5134 015042 012700 000227 MOV #227,R0 ;LOAD RO WITH TEST NUMBER 

5135 015046 013701 015066 MOV a#2$,R1 ‘LOAD R1 WITH TEST_INSTRUCTION WORD 
5136 015052 012704 000377 MOV #377 ,R4 SRESULT S /  B = 377 

5137 015056 012703 177400 MOV #177400,R3 INITIAL DEST OP = 177400 

5138 015062 000257 CCC CLEAR FLAGS 

ais 015064 000267 267 ;MAKE N:C = 0111 

bp} 015066 000303 2$: SWAB R3 ;TEST THE SWAB 

5143 015070 100003 BPL 3$ 

5144 015072 001402 BEQ 3$ DID SWAB MAKE N:C = 1000 

5145 015074 102401 BVS 3$ 

Rice 015076 103001 BCC 4$ 

>) 

rhb 4 015100 104002 3$: ERROR 2 ;SWAB FAILED TO ALTER CODES PROPERLY 
5150 015102 020403 4$: CMP R4,R3 ;DID SWAB DELIVER CORRECT RESULT? 
gre 015104 001401 BEQ TST230 ::BR IF Ok 

Ay, 015106 104002 5$: ERROR 2 SWAB DELIVERED WRONG RESULT 

5155 DDR RR III III IOI TORII TOIT TOI RR RRR Ek th tt 
5156 S*TEST 230 SWAB MODE 1 AND 2 TEST WITH POS. RESULT 

5157 DOO III IIUIIIOIDIOIOIIOIIUIIOIOISIOIOIOIUIDIUIDIDIOIIOIUIOIUIOIUIOIIUIDIOIDIUIDIDIDIDIDIUIOIOR IOI It 
5158 915110 TS$T230: 

5159 015110 000004 SCOPE : CALL THE SCOPE LOOP UTILITY 

5160 015112 012700 000230 MOV #230, ~ ;LOAD RO WITH TEST NUMBER 

5161 015116 013701 €15142 MOV a4#2$,R [LOAD R1 WITH ree A ll WORD 
5162 015122 012704 177400 MOV #177400, R4 RESULT S / B = 177400 

5163 015126 012702 063316 MOV #MBUF 0 ,R2 Re POINTS TO DEST. fs 

5164 015132 012712 000377 MOV #377, (R2) >SET UP DEST OP = 377 

5165 015136 000257 (ct ; CLEAR FLAGS 

gree 015140 000273 273 MAKE N:C = 1011 

db, 015142 000312 e$: SWAB (R2) TEST THE SWAB - DM! 

5170 015144 100403 BM! 3$ 

5171 015146 001002 BNE 3$ 3N:C = 0100 

5172 015150 102401 BVS 3$ 

He, 015152 103001 BCC 4$ 

Leg 015154 104001 3$: ERROR 1 ;SWAB FAILED TO ALTER CODES PROPERLY 
5177 015156 020412 4$: CMP R4,(R2) CORRECT RESULT? 

He 015160 001401 BEQ 5$ :BR IF OK 

ah 015162 104001 ERROR 1 ; SWAB DELIVERED WRONG RESULT 

5182 015164 013701 015204 5$: MOV a 20$ ,R1 LOAD R1 WITH TEST INSTR, WORD 
5183 015170 012702 063316 MOV #MBUF 0 ,R2 :Re POINTS TO DEST OP 

5184 015174 012712 000377 MO'V #377, (R2) :C(DESTJ = 000377 

5185 015200 000257 CCC :CLEAR FLAGS 

5186 015202 000273 273 sMAKE N:C = 1011 
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7230 SWAB MODE 1 AND 2 TEST wITH POS. RESULT 


208: SWAB (R2)+ iS TEST THE SWAB = DM2 

BM] 7$ iN:C = 0100 

BNE 7% 

BvS 7$ 

BCC 6$ 
7$: ERROR 1 ;SWAB FAILED TO SET CODES PROPERLY 
6$: MP R4, dAMBUF O ; CORRECT RESULT ? 

BEQ 8$ ;BR IF YES 
9$: ERROR 1 ; SWAB DELIVERED THE WRONG RESULT 
84: CMP R2, AMBUF 0+2 ;DID AUTO INCREMENT OCCUR ? 

BEQ TS7231 77BR IF YES 

tRROR 1 7 SWAB FAILED TO AUTO INC REG. 
CE AAAEAAAAAORAARAAARAAARAREAARARARAAARARAAEARAAARAAAARAAARARHRAAAARAERAES 
seTEST 231 SWAB MODE 1 TEST WITH NEG. RESULT 
FS EAAAAAAAAAAAAARAARARAAEAERAAKRARARAEARAARARAAARAERAERRARAREAHEH RARER 
TST231: 

SCOPE 7 CALL THE SCOPE LOOP UTILITY 

MOV #231,R0 ;LOAD RO WITH TEST NUMBER 

MOV aF2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #377 RS = RESULT S$ / B= 377 

MOV #MBUF O,R2 *R2 POINTS TO DEST OP 

MOV #177400, (R2) ;SET UP DEST. OP = 177400 

CCC CLEAR 4 ane 

267 *MAKE N:C = 0111 
2s: SWAB (R2) ZTEST THE SWAB 

BPL 3$ 

BEQ 3$ sM:C = 1000? 

BVS 3$ 

BCC 4$ 
3$: ERROR 1 SWAB FAILED TO ALTER CODES PROPERLY 
4S: CMP R4,(R2) CORRECT RESULT? 

BEQ TST232 ;7BR IF YES 
S$: ERROR 1 7; SWAB DELIVERED WRONG RESULT 
CF EAAAAAAARAAAAAAAAERARARAEARAAARAARERARAARAAAAAERERARHARRARAA HHH AAE ES 
s*TEST 232 NEG MODE O TEST : [DEST] = 0 
SC AAAARRAARAAREAAERARARAAAAARAAAAERARAEAAAAEARARAAREAARARAERHAKRERAAA AES 
TST232: 

SCOPE # CALL THE SCOPE LOOP UTILITY 

MOV #232,R0 :LOAD RO WITH TEST NUMBER 

MOV av?$,R1 :LOAD i WITH TEST INSTRUCTION WORD 

CLR RS RE SU 'Ts$ 7620 

CLR R3 INITIAL CDEST] = 0 
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1232 NEG MODE O TEST : [DEST] = 0 


CCC nee FLAGS 

273 MAKE N:C = 1077 
2$: NEG R3 ;TEST THE NEG 

BMI 3$ 

BNE z$ zN:C = 0100 ONLY °7°° SET? 

RvVS ¢ 

BCC 4% 
3$: ERROR 2 sNEG FAILED TO ALTER CODES PROPERLY 
4$: CMP R3,R4 sWAS RESULT = 0 

BEQ TS7233 7 7BR IF YES 
5$: ERROR 2 NEG DELIVERED WRONG RESULT 
‘TEST 233. ~sSNEG MODE O TEST : CDESTI LTO. ——CS™S 

*TEST 233 NEG MODE O TEST : [DEST] LT 0 

MEO PoRRRRRRRRRRRRRRRRRE RES RRR RRR ERRR RR RRR RR RRRARARRR REESE RRR SRR RRS SE OS 
1$1233: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #233,R0 ;ZLOAD RO WITH TEST NUMBER 

MOV aF2$,R1 ZLOAD R1 x TEST INSTRUCTION WORD 

MOV #2,R4 *RESULT Fy 2 

MOV #-2,R3 Z INITIAL CbesT) = 177776 

CCC = CLEAR FLAGS 

276 “MAKE m:¢€ = 1170 
ef: NEG R3 : TEST THE NEG 

BM] 3$ 

BEQ 3$ 3N:C = 0001? 

BVS 3$ 

BCS 4% 
3$: ERROR 2 NEG FAILED TO ALTER CODES PROPERLY 
4$: CMP R3,R4 sRESULT = 2? 

BEQ TST234 »:BR IF YES 
5$: ERROR 2 NEG DELIVERED WRONG RESULT 
CFE AARAAARARERREAEEREKEERERAKERRAERAAARRAERAERRARAEERAAKAERAE ERAS 
reTEST 234 NEG MODE O TEST : [DEST] = 100000 (8) 
LSAT RARE AEERAERARERARRK AERA RRAER REE ARERR AERAARREARAEARR EEE 
1S1234: 

© COPE —_ THE SCOPE LOOP UTILITY 

MOV #234,R0 ;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #100000,R4 {RESU LT S / B = 10000 

MOV R4,R3 ZINITIAL CDEST] = 100000 

ccc *CLEAR FLAGS 

SEZ sMAKE N:C = 01000 


2$: NEG RZ TEST THE NEG 
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1234 NEG MODE O TEST : CDESTJ = 100000 (8) 


BPL 3$ 

BEQ %$ emzC = 10117 

BvC 3$ 

BCS 4$ 
3$: ERROR 2 NEG FAILED TO ALTER CODES PROPERLY 
4$: CMP R3,R4 sRESULT STILL 100000? 

REQ 187235 ssBR if YES 
5$: ERROR 2 NEG DELIVERED WRONG RESULT 
FS RATAAAAAAAAAAAAAARARRARRARAERRARAAAARERAAAAAAARRARAARARRARARARAAEE 
seTEST 235 NEG MODE 1 TEST : CDEST] = 0 
FL AAAAARAAAARAAARAARARARRAERRERRARARARRRAARARARARRRAARARARRARERE AD 
TSleso¢ 

SCOPE : CALL THE SCOPE LOOP UTILITY 

MOV #235,R0 ;LOAD RO WITH TEST NUMBER 

MOV av2$,R1 *LOAC R1 WITH TEST aac WORD 

MOV AMBUFO,R2 *R2 POINTS TO DEST O 

CLR RS ;RESULT §S /B=0 

CLR (R2) s INITIAL CDESTJ = 0 

CCC aha FLAGS 

273 MAKE N:C = i017 
2s: NEG (R2) s TEST THE NEG 

BM! 3$ 

BNE 3$ sw:C = 0100? 

BVS 3$ 

BCC 4$ 
3$: ERROR 1 NEG FAILED TO ALTER CODES PROPERLY 
4S: CMP (R2) ,R4 ZRESULT = 0? 

BEQ TST236 >;BR IF YES 
5$: ERROR 1 NEG DELIVERED WRONG RESULT 
CLEARER AERA AER KEE REREER EE RERE AE RERARE EEE AERA RROREA EEE 
I*TEST 236 NEG MODE 1 TEST : CDESTJ GT O 
CLEARER AREER ARERR EER REAR EERREAKEERERER REED 
TST236: 

SCOPE 2 CALL THE SCOPE LOOP UTILITY 

MOV #236,R0 :LOAD RO WITH TEST NUMBER 

MOV a42$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 :R2 POINTS TO DEST OP 

MOV #-2,R4 ;RESULT S / B = 177776 

MOV #2, (R2) * INITIAL CDEST] = 2 

CCC = CLEAR FLAGS 

266 *MAK cE wsC€ = 0110 
2$: NEG (2) s TEST THE NEG 


BPL 3$ 


SEQ 0100 
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G MODE 1 TEST : 


ERROR 


S*TEST 237 


2$: 


3$: 
4$: 


5$: 


SCOPE 


ERROR 


S*TEST 240 


MASSA LARA SALAZAR ASAALEALASASALESS SAR ERE AAS RARASEAS RASA SALAS SS SD | 


181240: 


2$: 


1 


(R2) RG - 
1S1237 


1 


(R2) ,RS 
TST240 


1 


re ges 
a42$,R1 
AMBUF 0 ,R2 
#100000, RS 
R4,(R2 


(DEST GT 0 


sN:C = 1001? 


;NEG FAILED TO ALTER CODES PROPERLY 


; CORRECT RESULT? 
BR IF YES 


NEG DELIVERED WRONG RESULT 


Wee OAeRRRRRERRRASRASESEAARSASAAAR AAA ERAR ES AAS AR RRR SR ARRAS ARRAS SS DS 


NEG MODE 1 TEST : 


Peal lalialalielalatalielateialeteieleielelelehatahelcielalelelehileletaleheheiehaleieheietelaielelehelelahelsielalahaielaieielelel 


1$1237: 


CDEST] LT 0 


;CALL_THE SCOPE LOOP UTILITY 
:;LOAD RO WITH TEST NUMBER 
;LOAD R1 WITH TEST FF esaaaicabeta WORD 


:R2 ey re DEST 
RESULT =2 
* INITIAL ses] & 
;CLEAR FLAGS 
“MAKE N:C = 1110 


i; TEST THE NEG 


= 0001? 


;NEG FAILED TO ALTER CODES PROPERLY 


; CORRECT RESULT = 
77BR IF YES 


;NEG DELIVERED WRONG RESULT 


'WEeRARERERSSRESRSRR LARS SRRARRERRR RRS E RRR RARER RRR ASRS RR RASS SSSR SS DS 


NEG MODE 1 TEST: 


177776 


2? 


[DEST] = 100000 (8) 


;CALL_THE SCOPE LOOP UTILITY 
NUMBER 


>;LOAD RO WITH TEST 


;LOAD R1 WITH TEST INSTRUCTION WORD 


:R2 POINTS TO DEST OP 
;RESULT S_/ B = 100000 


INITIAL CDESTI = 
[CLEAR FLAGS 
:MAKE N:Z = 0100 


TEST THE NEG 


ame = 10T1? 


100000 


SEQ 0101 
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1240 NEG MODE 1 TEST: CDESTJ = 100000 (8) 


BCS 4$ 
3$: ERROR 1 ;NEG FAILED TO ALTER CODES PROPERLY 
4$: CMP (R2) ,RS ; CORRECT RESULT = 100000? 
BEQ TST241 ;;BR IF YES 
S$: ERROR 1 ;NEG DELIVERED WRONG RESULT 
LFA RARAARAAARAAKRAERRRAEEKERARRAERERAARARRARRRAEARRRAAERRARRER EH 
s*TEST 247 ROR TEST = DMO = N:C = 1110 
SL RARER AERA ERK RERKEREERREE EERE AREERERERRERERAERAEAEERER EEE 
TST241: 
SCOPE aon THE SCOPE LOOP UTILITY 
MOV #241,R0 OAD RO WITH TEST NUMBER 
MOV a#2$,R1 ‘i OAD R1 WITH TEST INSTRUCTION WORD 
MOV #52525,R4 *RESULT S / B = 52525 
MOV #125252,R3 ;CDESTJ = 125252 
ccC ;CLEAR FLAGS 
276 sNsC = 11717 
2$: ROR R3 ; TEST THE ROR 
BM! 3$ iN:C = 0000 ? 
BEQ 3$ 
BVS 3$ 
BCC 4$ 
3$: ERROR 2 ;ROR FAILED TO ALTER CODES PROPERLY 
4$: CMP RG ,R3 :CORRECT RESULT ? 
BEQ TS7242 > BR IF YES 
5$: ERROR 2 ;ROR DELIVERED THE WRONG RESULT 


SL RARER EERE REE EEE REE E ERE EKE EAR RK EKER EERER ORE REE REE 


S*TEST 242 ROR TEST - DMO - N:C = 1000 


STARR EEK EERE EERE EKER REE ERE EE 


TST242: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #242 ,RO0 +: LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
CLR RS RESULT S / B = 000000 
MOV #1,R3 ;CDESTJ = 1 
ccc “CLEAR FLAGS 
SEN *N:C = 1000 
2$: ROR R3. : TEST THE ROR 
BM! 3$ iN:C = 0111 ? 
BNE 3$ 
BVC 3$ 
BcS 4$ 
3$: ERROR 2 sROR FAILED TO ALTER CODES PROPERLY 
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1242 ROR TEST = DMO = N:C = 1000 


4$: CMP R4 ,R3 ; CORRECT RESULT ? 
BEQ TST243 ;;BR IF YES 


5$: ERROR 2 ;ROR DELIVERED THE WRONG RESULT 


Monae kat bee Eee os aah i oe 


S*TEST 263 ROR TEST - DMO = N:C = 0111 ‘ 


'MmARRAAASLAAAAAAARESARAASARSRRRARARARASASARAAARERARARARR ARRAS SSDS ED | 


1§1263: 
SCOPE 


:CALL THE SCOPE LOOP UTILITY 
#243,RO OAD RO WITH TEST NUMBER 
a#2$.R1 <i OAD RI WITH TEST INSTRUCTION WORD 
#125252,R46 ‘RESULT S / B = 125252 
#52525, R3 DEST = 052525 
: CLEAR R FLAGS 


;TEST THE ROR 
= 1001 ? 


3$: ef ;ROR FAILED TO ALTER CODES PROPERLY 


4$: R4,R3 ;CORRECT RESULT ? 
TST244 :;BR IF YES 


5$: ERROR 2 ;ROR DELIVERED THE WRONG RESULT 


CARRERE REE ERE RE REE KEKE KEKE EERE KERR 
Z*TEST 244 ASR TEST - DMO - N:C = 1000 
CLARE RE RERER EEE ERE RE K EERE E EE RER ERR ERERRRERER EERE EEE 
TST244: 

pcm THE SCOPE LOOP UTILITY 

OAD RO WITH TEST NUMBER 

Si OAD R1 WITH TEST INSTRUCTION WORD 

SRESULT S / B = 000000 

:C(DEST] = 

:CLEAR FLAGS 

iN:C = 1000 


i: TEST THE ROR 
= 0111 ? 


;ROR FAILED TO ALTER CODES PROPERLY 


R4,R3 ;CORRECT RESULT ? 
TST245 :;BR IF YES 


ROR DELIVERED THE WRONG RESULT 


SEQ 0103 
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016244 


016246 
016250 


016252 


016254 


016 

016310 
016312 
016314 


016316 
016320 


016322 
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10 
103401 
104002 


020403 
001401 


104002 


052525 
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1244 ASR TEST = DMO = N:C = 1000 


WEARER SAASLASAALASSASARRRA RASA RARARARRRRARRRRR ARERR R RRR RRA SARA SSD S| 


:*TEST 245 ASR TEST = DMO. = N:C = 0101 
TORR RAAB RRBABAAAZALASAASASESARESEASRES REESE RRR ERR RRR ARAR ESSER ERE SER RES SS 
181245: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #245,RO *;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #152525 RG CRESULT S / B = 152525 
MOV #125252,R3 :CDEST] = 125252 
ccc : CLEAR FLAGS 
265 = 0101 
2$: ROR R3 ; TEST THE ROR 
BPL 3$ :N:C = 1010 ? 
BEQ 3$ 
BVC 3$ 
BCC 4$ 
38: ERROR 2 :ROR FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 : CORRECT RESULT ? 
BEQ TST246 :;BR IF YES 
5$: ERROR 2 :ROR DELIVERED THE WRONG RESULT 
CLR RRR EE 
S*TEST 246 ASR TEST - DMO - N:C = 1100 


SL AREER 


TS$1246: 


SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #246,RO OAD RO WITH TEST NUMBER 
MOV a#2$.R1 ‘TOAD R1 WITH TEST INSTRUCTION WORD 
MOV #25252,R4 “RESULT S / B = 25252 
MOV #52525 .R3 S(DEST] = 52525 
CCC : CLEAR FLAGS 
274 *N:C = 1100 
23: ROR R3 : TEST THE ROR 
BMI 3$ iN:C = 0011 ? 
BEQ 3$ 
BVC 3$ 
BCS 4$ 
3$: ERROR 2 :ROR FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 :CORRECT RESULT ? 
BEQ TST247 *:BR IF YES 
5$: ERROR 2 :ROR DELIVERED THE WRONG RESULT 
SS AAA AAAAEAEAAAAAERARERAEAARAEAEAAERERRAERARAARAAERAAERAAARARAERARARAERE RAE 
T*TEST 267 ROR TEST - DM1 - N:C = 1110 


CAAA AA AAR ARATE AAEAEAAAAAEAAAARAAAAAERAARAAAHERAARERKERERARERA Ree 


SEQ 0104 
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CQKDAE .P11 17=SEP= ROR TEST = DM1 = N:C = 1110 SEQ 0105 
5579 016324 TST247: 
5580 016324 000004 SCOPE ;CALL_THE SCOPE LOOP UTILITY 
5581 016326 012700 000247 MOV #247 ,RO ;;LOAD RO WITH TEST NUMBER 
Pe 016332 013701 016356 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
558 6336 012702 063316 MOV AMBUF OR [DEST ADDR = MBUF 
584 016342 012704 052525 MOV #52525 RS ;RESULT S / B = 52525 
5585 016346 012712 125252 MOV #125252, (R2) SCDEST] = 125252 
5586 016352 000257 CCC ;CLEAR FLAGS 
rr tf 016354 000276 276 iN:C = 1110 
4 016356 006012 e$: ROR (Re) i TEST THE ROR 
5591 016360 100402 BM] 3$ iN:C = 0000 ? 
5592 016362 001402 BEQ 3$ 
5593 016364 102401 BvS 3$ 
gone 016366 103001 BCC 4$ 
228 016370 104001 3$: ERROR 1 :ROR FAILED TO ALTER CODES PROPERLY 
5598 016372 020412 4$: CMP R4,(R2) : CORRECT RESULT ? 
5599 016374 001402 BEQ TST250 ::BR IF YES 
016376 011203 MOV (R2) ,R3 :GET THE WAS DATA 
od 016400 104001 5$: ERROR 1 ;ROR DELIVERED WRONG RESULT 
5603 LLU RRR EERE ERE RRERER REE ERE EERE ERR 
;*TEST 250 ROR TEST - DM1 = N:C = 1000 
5605 DLR EERE REAR REE EEE REE EAE REE 
5606 016402 1$T250: 
5607 016402 000004 SCOPE ;CALL_THE SCOPE LOOP UTILITY 
5608 016404 012700 000250 MOV #250,RO0 ;:LOAD RO WITH TEST NUMBER 
5609 016410 013701 016432 MOV a2$,R1 [LOAD R1 WITH TEST INSTRUCTION WORD 
5610 016414 012702 063316 MOV AMBUF 0 ,R2 DEST ADDR = MBUFO 
5611 016420 005004 CLR R4 :RESULT $ / B = 000000 
5612 016422 012712 000001 MOV #1,(R2) :CDESTJ = 1 
5613 016426 000257 CCC ; CLEAR FLAGS 
geie 016430 000270 SEN :N:C = 1000 
244 | 016432 006012 2$: ROR (R2) TEST THE ROR 
5618 016434 100403 BM] 3$ iN:C = 0111 ? 
5619 016436 001002 BNE 3$ 
5620 016440 102001 BvC 3$ 
sos} 016442 103401 BCS 4$ 
xt 016444 104001 3$: ERROR 1 ;ROR FAILED TO ALTER CODES PROPERLY 
5625 016446 020412 4$: CMP R4, (R2) ;CORRECT RESULT ? 
2068 016450 001402 BEQ TST251 ::BR IF YES 
5628 016452 011203 MOV (R2) ,R3 :GET THE WAS DATA 
raat 016454 104001 5$: ERROR 1 ;ROR DELIVERED WRONG RESULT 
5631 PLATA eR eee 
S*TEST 251 ROR TEST - DM? - N:C = 0111 
5633 LARA REAR EAR RR EAE ARRATREA RRR eee 
5634 016456 TST251: 
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23: 


3$: 
4$: 


5$: 


MOV 
ERROR 
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TEST = DMI = N:C = 077 


;CALL_THE SCOPE LOOP UTILITY 


#251,RO +:LOAD RO WITH TEST NUMBER 
a#2$.R1 LOAD R1 WITH TEST INSTRUCTION WORD 
#MBUF O,.R2 DEST ADDR = 
#125252,RG SRESULT S$ / 125252 
#52525, (R2) SC(DEST] = 62825 
;CLEAR FLAGS 
iN:C = 0111 
(R2) ; TEST THE ROR 
3$ :N:C = 1001 ? 
3$ 
3$ 
4$ 
1 sROR FAILED TO ALTER CODES PROPERLY 
R4,(R2) ; CORRECT RESULT ? 
TST252 77BR IF YES 
(R2) ,R3 ;GET THE WAS DATA 
1 ;ROR DELIVERED WRONG RESULT 


ee a eee ee ee a ee 


s*TEST 252 


S RRR EAKRAEEAERAERAERARARRAEAAARRAERARAAREREEAAEREEARARRERERKEKEREKE 


7§1252: 


2$: 


3$: 
4$: 


5$: 


MOV 
ERROR 


ASR TEST - DM1 = N:C = 1000 


;CALL_ THE SCOPE LOOP UTILITY 


#252,R0 +: LOAD RO WITH TEST NUMBER 
a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
AMBUFO,R2 :DEST ADDR = MBUFO 
RS “RESULT S / B = 000000 
#1,(R2) :(DEST] = 1 
;CLEAR FLAGS 
:N:C = 1000 
(R2) : TEST THE ROR 
3$ iN:C = 0111 ? 
3$ 
3$ 
4$ 
1 ;ROR FAILED TO ALTER CODES PROPERLY 
R4,(R2) : CORRECT RESULT ? 
TS7T253 7 BR IF YES 
(R2) ,R3 ;GET THE WAS DATA 
1 ;ROR DELIVERED WRONG RESULT 


'WEAAAAAA RAR RRR RERERER RR RRRRR RRR RR RRR RR RRR RR RRR RRR RRR RRR RR RRR ES 


SSTEST 253 


WEARS SS EASES RRR RRR RRR RRR RRR RR RRR RRR RRR RRR RRR RRR RRR RRR RRA RS ES 


151253: 


ASR TEST - DM1 - N:C = 1100 


D9 
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016716 
016720 
016722 


016732 


016734 
016736 


016740 
016742 


016744 


ASR TEST = DM1 = N:C = 1100 SEQ 0107 


* CALL THE SCOP 
;;LGAD RO WITH 
- LOAD R1 WITH 


; TEST THE ROR 
iN:C = 0011 ? 


3$: ROR FAILED TO ALTER CODES PROPERLY 


43: R4,(R2) ; CORRECT RESULT ? 
TST254 326R If YES 


011203 MOV (R2) ,R3 GET THE WAS DATA 
104001 5$: 1 ROR DELIVERED WRONG RESULT 


PARES EESESSSLESLORSE SEES R EERE RRR RE SR RRR RRR RRR ARRAS RRR RRR RSS D OS 


s*TEST 254 ASR TEST = DM] = N:C = 0101 
LURE AAA ERREAEREERERERERERERAREEREERRAERERRAEERRRRRRAH TERRE RRS 
TST254: 

;CALL THE SCOPE LOOP UTILITY 

+; LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 

a - = MBUFO 

;RESULT S$ ‘ B = 152525 

‘Tbe STI = 125252 

> CLEAR FLAGS 

*N:C = 0101 


TEST THE ROR 
= 1010 ? 


3$: ;ROR FAILED TO ALTER CODES PROPERLY 


4%: R4, (R2) : CORRECT RESULT ? 
TST255 :;BR IF YES 


011203 MOV (R2) ,R3 GET THE WAS DATA 
104001 5$: 1 ROR DELIVERED WRONG RESULT 


SARA RARER REAR ERR ERE EERE ERATE ERERERAE RAE R ES 


SeTEST 255 RORB TEST - DM2 - EVEN ADDRESS 


PEP PPE SESS RE ESE SSE CESS RE REESE ERE RSE RR RRS RRR RR RRS RRR RRA RR ARDS ADS DS 


1$1255: 





“_ 
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017014 
017016 
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017024 


017956 
017060 
017062 
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017070 


017072 
017074 
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022703 
001401 


104005 


020412 
001402 


011203 
104001 


020412 
001402 


011203 
104001 


063317 


EE 9 
mar ge let 17=SEP=79 09:55 PAGE 109 
1255 RORB TEST = DM2 = EVEN ADDRESS SEQ 0108 


:CALL THE SCOPE LOOP UTILIT 
+;LOAD RO WITH TEST NUMBE R 
‘LOAD R1 WITH TEST INSTRUCT 
=DEST ADDR = MBUFO 
“RESULT S / B = 177 
R2,R :R3 CONTAINS DEST ADDR 
#377, (R2) :(DEST) = 377 
:SCOPE SYNC ‘'C’’ = 0 


2$: (R3)+ ; TEST THE RORB 


Y 
ION WORD 


4$ ;BR IF ROR SET ‘C'’ 

3$: i 1 ;ROR FAILED TO SET ‘’’ 

4$: AMBUFO+1,R3 ;DID DEST REG GET INCREMENTED ? 
6% ;BR IF YES 


5$: 5 ;RORB FAILED TO UPDATE DEST REG 


6$: R4, (R2) ; CORRECT RESULT ? 
TST256 ;;BR IF YES 


MOV (R2) ,R3 ;GET THE WAS DATA 
7$: 1 ;RORB DELIVERED WRONG RESULT 


REE EERE EEEEREEREREREREEEEARREEEERARER ERE 


S*TEST 256 RORB TEST - DM! ~ EVEN ADDRESS 


oO PPP EO ROSES SERSSSESAE SASSER ESESE SALES ER EAR ARR RRR SARA RRRRRRRRA SRS ES SS 
1S1256: 
7 CALL THE SCOPE LOOP UTILITY 
-;LOAD RO WITH TEST NUMBER 
> LOAD R1 WITH TEST INSTRUCTION WORD 
MBUF 0 


: 377 
R2,R3 :R3 aA DEST ADDR 
#376, (R2) :CDESTI = 376 

:CLEAR FLAGS 

[SCOPE SYNC - SET ‘'C’’ 


2$: (R3) ; TEST THE RORB 
4$ ;BR IF *'C’' CLR = IT SHOULD BE 
3$: 1 ;RORB FAILED TO CLR ‘C"’ 


4$: R4,(R2) ; CORRECT RESULT ? 
TST257 ;7BR IF YES 


MOV (R2) ,R3 ;GET THE WAS DATA 
5$: 1 ;RORB DELIVERED WRONG RESULT 


POP PP PESO SERPS SER ER SEES ERE REE RES EERE RRR RRR RRR RRR RRR RRR ASSES SOD DI 


SSTEST 257 RORB TEST - DM2 - ODD ADDRESS 


SS RAAAAAEEAAAAERERAAREREEERAREAEERAAARRARRAAAAARAREEEEAEAREREE ERAS 


1$1257: 
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017150 
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017164 
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017170 
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017174 


017232 
017234 
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017240 
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000257 
017146 
000040 
063317 
077777 
063316 
177777 


063320 


000260 
017232 
063317 
177777 
063316 


177377 


063240 
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EST = DM2 = ODD ADDRESS 


;CALL_THE SCOPE LOOP UTILITY 
7;LOAD RO WITH TEST NUMBER 
;LOAD R1 WITH TEST INSTRUCTION WORD 


' , or HALT SET ?? 

;BREAK = DEPRESS CONTINUE TO RESTART 
DEST ew MBUF 0+ 1 

sRESULT $ / B = 77777 

[POINT R5 TO CHECK RESULT 

R3 cera 7953! ADDR 

;CDESTI = 

; SCOPE SYNC. - " =0 

; TEST THE RORB 

sBR IF "'C’’ IS SET = IT SHOULD BE 
;RORB FAILED TO SET ‘C"’ 


DID DEST REG GET INCREMENTED ? 
;BR IF YES 


ZRORB FAILED TO UPDATE DEST REG 
CORRECT RESULT ? 
:7BR IF YES 


3GET THE WAS DATA 
;RORB DELIVERED WRONG RESULT 


CC ARERR RRAREREE ARRAS ASRRARASRRARASLRRESRSSARRR RAR RAR RRR RRR RRR RRS ESS! 


RORB TEST - DM1 - ODD ADDRESS 


WEARS eR ERR RRR EERE RRR RRR RRR RARER RRR RR RE RR RRR RAS ARR RRR RRR RASS SS DI 


MACY11 gohyet 

1257 RORB T 
SCOPE 
MOV #257, ~ | 
MOV a#2$,R 

.-SBTTL USER conten és. BREAKPOINT -- BITS 

BIT #BITS,@A4BPTLOC ;BREAK 
BEQ +6 
HALT 
MOV AMBUF +1 ,R2 
MOV #77777,Re 
MOV AMBUFO,RS 
MOV R2,R 
MOV #-1,(R5) 
CCC 

2$: RORB (R3)+ 
BCS 4$ 

z¢: ERROR 1 

4$: CMP #MBUF 0+2,R3 
BEQ 6$ 

5$: ERROR 5 

6$: CMP RG, (R5) 
BEQ TST260 
MOV (R5) ,R3 

7$: ERROR 1 

:*TEST 260 

157260: 
SCOPE 
MOV #260, ” 
MOV a2$,R 
MOV eter. R2 
MOV #-1,R4 
MOV AMBUF ORS 
MOV R2,R3 
MOV #177377, (R5) 
SEC 

2$: RORB (R3)+ 
BCC 4$ 

3$: ERROR 1 

4$: CMP RG, (RS) 
BEQ TS1261 

V (R5) ,R3 
S$: ERROR 1 


;CALL_THE SCOPE LOOP UTILITY 
;LGAD RO WITH TEST NUMBER 

LOAD R1 WITH TEST INSTRUCTION WORD 
:DEST aWwY MBUF 0+1 

RESULT S$ / B = 177777 

POINT R5 TO CHECK RESULT 
R3 cara DEST ADDR 

S (DEST = 177377 

; SCOPE SYNC = SET °C” 


TEST THE RORB 
;BR IF "'C’* CLEAR - IT SHOULD BE 
;RORB FAILED TO CLEAR *'C*’ 


; CORRECT RESULT ? 
;BR IF YES 


GET THE WAS DATA 
;RORB DELIVERED WRONG RESULT 


SEQ 0109 
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017306 
017310 
017312 


017314 
017320 


017322 


017324 
017326 


017330 
017332 


017370 
017372 
017374 
017376 


017400 
017402 


017406 


me 
r 
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17+S 


104001 


022703 
001401 


104005 


020415 
001402 


011503 
104001 


103001 
104001 


020415 
001402 


011503 


063320 


100377 
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7260 RORB TEST = DMi = ODD ADDRESS 


wa RRERARERE AERA ERERR AREER ERE REREREERERERRRERRERERE REE EEE 


TeTEST 261 ASRB TEST = DM2 = ODD ADDRESS 
J FRAP ARAAAAAARARERAARARAAREARARARAARERARAARARERARERARAARRAARE REHEARSE 
751261: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #261,R0 [LOAD RO WITH TEST NUMBER 

MOV av2$,R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 

MOV AMBUF 0+1 RZ :DEST ADDR = MBUF Os! 

MOV #377,RG “RESULT S / B = 377 

MOV #MBUF ORS ‘POINT R5 TO CHECK RESULT 

MOV R2,R3 *R3 CONTAINS DEST ADDR 

MOV #777, (R5) :(DESTJ = 777 

CCC :SCOPE SYNC ‘C'' = 0 
2%: ASRB (R3)+ : TEST THE ASRB 

BCS 4$ :BR IF CARRY SET = IT SHOULD BE 
3$: ERROR 1 :ASRB FAILED TO SET THE CARRY 
4%: CMP AMBUF 0+2,R3 :DID DEST REG GET INCREMENTED ? 

BEQ 6$ “BR IF YES 
S$: ERROR 5 :ASRB FAILED TO UPDATE DEST REG 
6$: (MP RG, (R5) : CORRECT RESULT ? 

BEQ TST262 *:BR IF YES 

MOV (R5) ,R3 :GET THE WAS DATA 
7$: ERROR 1 [ASRB DELIVERED WRONG RESULT 
SFR REEERERERAEEREEEEEREERRERRAREEREERAEREERERERARAREREREEREED 
T*TEST 262 ASRB TEST - DM1 - ODD ADDRESS 
CL UAARAAAAAARAARAREARAARAAAERRAARARAKRERARARARAARARAARAAHERRERRA EE 
TST262: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #262,RO ::LOAD RO WITH TEST NUMBER 

MOV a2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 

MOV AMBUF 0+1,R2 “DEST ADDR = MBUFO+1 

MOV #140377,R4 SRESULT S$ / B = 140377 

MOV AMBUF ORS :POINT RS TO CHECK RESULT 

MOV R2,R3 R3C CONTAINS DEST ADDR 

MOV #100377, (RS) : (DEST = 100377 

SEC SCOPE SYNC - ‘‘C'' = 1 
2%: ASRB (R3) :TEST THE ASRB 

BCC 4$ :BR IF CARRY CLEAR - If SHOULD BE 
3$: ERROR 1 :ASRB FAILED TO CLEAR THE CARRY 
4$: CMP R4, (RS) = CORRECT RESULT ? 

BEQ TS1263 ;:;BR IF YES 


MOV (R5) ,R3 ;GET THE WAS DATA 


SEQ O11 


—_——_ 
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104001 


103401 
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103001 
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000177 


063317 


000264 
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7262 ASRB TEST = DM] = ODD ADDRESS SEQ 0111 
S$: ERROR 1 ;ASRB DELIVERED WRONG RESULT 
fF TARARAAARARAAAARARAARAARARARAKARARARARAAARARARARAARARARARARAAAAARAARNER 
s*TEST 263 ASRB TEST - DM2 = EVEN ADDRESS 
fF RARAARARAAAAARARAAARAAAAAERAARARAARARARARAAARARAARAAARAARARAAHERANR 
TS1263: 

SCOPE :CALL THE SCOPE 7k 90P UTILITY 

MOV #263,R0 *;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 *LOAD R1 WITH TEST INSTRUCTION WORD 

MOV AMBUF 0,R2 “DEST ADDR = MBUFO 

MOV #77,RG sRESULT S$ / B = 77 

MOV R2,R3 7R3 CONTAINS DEST ADDR 

MOV #177, (R2) *(DEST] = 177 

CCC SCOPE SYNC - ‘C'' = 0 
2$: ASRB (R3)+ :TEST THE ASRB 

BCS 4$ :BR IF "'C'' = 1 = IT SHOULD BE 
3$: ERROR 1 ZASRB FAILED TO SET ‘'C’' 
S$: CMP #MBUF 0+1,R3 DID DEST REG GET INCREMENTED ? 

BEQ 6$ :BR IF YES 
5$: FRROR 5 ZASRB FAILED TO UPDATE DEST REG 
6$: CMP R4, (R2) CORRECT RESULT ? 

BEQ TST 264 :;BR IF YES 

MOV (R2) ,R3 GET THE WAS DATA 
7$: ERROR 1 ZASRB DELIVERED WRONG RESULT 
SEAR AARAEAAAEAAERAEREARARAEARRARERAERAERRERARROREEARRAHARAHEEREE EES 
S*TEST 264 ASRB TEST - DM1 - EVEN ADDRESS 
CE AAA RARE RAEEKKEERREREEERRRAERERRAERRAERAARAEARARAARERAREAERREHA RS 
TS1T264: 

SCOPE CALL THE SCOPE LOOP UTILITY 

MOV #264,RO *:LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV AMBUF 0,22 :DEST ADDR = FO 

MOV #303,R4 “RESULT S / B = 303 

MOV R2,R :R3 CONTAINS DEST ADDR 

MOV #206, (R2) (DEST) = 206 

SEC :SCOPE SYNC = ‘‘C’' = 1 
2$: ASRB (R3) :TEST THE CLRASRB 

BCC 4$ :BR IF CARRY CLEAR - ITSHOULD BE 
%$: ERROR 1 ZASRB FAILED TO CLEAR THE CARRY 
4$: CMP RG, (R2) s CORRECT RESULT ? 

BEQ 7$7265 :;BR IF YES 


MOV (R2) ,R3 ;GET THE WAS DATA 
5$: FRROR 1 jASRB DELIVERED WRONG 8é SULT 
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000265 
017562 


000266 
017630 
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T7264 ASRB TEST = DM? = EVEN ADDRESS SEQ 0112 
PPR eR RRR RRR RR RRR RRRRRAR RR RR RRRRRRRRRRR RRR RRR RRR RRR RRR RRR RRR REE SE 
TaTEST 265 TST DMO TEST = N:C = 10177 
6 f RAAAAAARARAAAAAARAAARA ERARAARARARAAHAERARRAAHAARARAAAARRRARATHOHD 
TST265: 

SCOPE # CALL THE SCOPE LOOP AT 

MOV #265,R0 ;LOAD RO WITH TEST 

MOV + eae Ri = LOAD R1 WITH TEST INSTRUCTION WORD 

CLR “RESULT S / B = 000000 

CLR A ;C(DEST] = 000000 

CCC ;CLEAR CODES 

273 3N:C=1011 
ges TST R3 sTEST THE TST 

BM! 3$ “ast = OTC0..? 

BNE 3$ 

BVS 3 

BCC 4% | 
3$: ERROR 2 :TST FAILED TO ALTER CODES PROPERLY 
4$: CMP R423 sRESULT OK ? 

BEQ TST26S 7 7BR IF YES 
5$: ERROR 2 :TST ALTERED THE CDEST3 
CC REAR AAAEREKKRAERKERRARAARARARARRARRRARAARAHARRAAEARAARAARRARARAHEREE 
Z*TEST 266 TST DMO TEST = N:C = 0100 
CC AATARRARAAAAARAAAEARARAARARAAKARAAAAARAARARAAAERRARARAAAKA KEP ANE EER 
TST266: 

SCOPE 2 CALL THE SCOPE LOOP UTILITY 

MOV #266,RO0 ;LOAD RO WITH TEST NUMBER 

ey! -—igtale “LOAD R1 WITH TEST INSTRUCTION WORD 

L 

COM RS sRESULT S / B = 177777 

MOV R4,R3 >CDEST] = 177777 

Col ZCLEAR CODES 

264 :N:C=0100 
es: TST R3 sTEST THE TST 

BPL 3$ *N=C = TOQ0 ? 

BEQ 3$ 

BVS 3$ “ 

BCC 4$ 
3$: ERROR 2 :TST FAILED TO ALTER CODES PROPERLY 
4$: CMP RG,RS “a OK ? 

BEQ TST 267 _228R If Ves 
5$: ERROR 2 :TST ALTERED THE [DEST] 


'VEttioaAaeaae RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RR RRR RRR RRR RRR RRR SES | 


SeTEST 267 CLR DMO TEST = N:( = 1011 
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017652 


0 
017672 
017674 


017676 


017710 


017712 
017714 


017716 


017720 


017740 
017742 
017744 
017746 
017750 
017752 
017754 


017756 
017760 


017762 


017764 


017772 
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000004 
012700 
013701 
005004 
012703 
000257 
000273 
005003 
100403 
001002 
102401 
103001 
104002 


020403 
001401 


104002 


104002 


000004 
012700 
013701 


Ic TE 
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00026 
01767 


177777 


000270 
017742 


177777 


000271 
020012 


1267 CLR DMO TEST = N:C = 


REAR EAE KRAERRRRAARARRAAKRARARAAEARRRHKRE KRHA ERE 


3$: 


4$: R4,R3 
TST271 


5$: ERROR 2 


151267: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #267,R0 77LOAD RO WITH TEST NUMBER 
MOV af 2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 ;RESULT S$ ‘ B = 000000 
MOV #-1,R3 CEST) = 177777 
ccc ae A CODES 
273 = 1071 
28: CLR R3 : TEST THE CLR 
BM] 3$ = 0100 ? 
BNE 3$ 
BVS 3$ 
BCC 4$ 
34: ERROR 2 ;CLR FAILED TO ALTER THE CODES PROPERLY 
| 4S: CMP R4 RB :RESUL OK ? 
BEQ TST270 BR IF YES 
5$: ERROR 2 ;CLR DELIVERED THE WRONG RESULT 
a Ee 
:*TEST 270 CLR DMO TEST - N:C = 0000 
CS RARER REE ERAEEERKEERERRERARRARRERKAERARHREAERRAAAERRERRARER ER 
TSTe7vos 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #270,R0 tiL OAD RO WITH TEST NUMBER 
MOV a2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 “RESULT S / B = 000000 
MOV #-1,R3 SCDESTJ = 177777 
ccc ;CLEAR CODES 
2s: CLR R3 : TEST THE CLR 
BMI 3$ = 0100 ? 
BNE 3$ 
BVS 3$ 
BCC 4$ 


;CLR FAILED TO ALTER THE CODES PROPERLY 


is OK ? 
;;BR IF YES 


:CLR DELIVERED THE WRONG RESULT 


'WeSORSAASARASSERSSARESERSRRRSSRERRRR RRR RRA SRR RR RRR RR ARRAS ERE RRS S DS | 


SeTEST 271 COM DMO TEST - N:C = 0110 


SL REAR A AEA RERERERREEAARE EERE REEAEKEEAEREREERERRAERKE AKER ARS 


a#2$.R1 


;CALL_THE SCOPE LOOP UTILITY 
+:;LOAD RO WITH TEST NUMBER 
;LOAD R1 WITH TEST INSTRUCTION WORD 


SEQ 0113 









6083 
6084 


61 


DRXAXRAARAAAO 
ak ant a an aed an ad ones ca i 
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017776 
020002 


020124 
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103401 
104002 


020403 
001401 


104002 


104002 


020403 
001401 


104002 


000272 
020060 


177777 


000273 
020126 


177777 


es: 


3$: 


S$: 


5$: 


SRR EERE RE KERR EERE KEE REAR ERE REE EERE EEE 


MACY11 g yee 
1271 


ERROR 


S*TEST 272 


Went Pee EERE RE EERE RESRSARRRREAAARR RARE RARER AA SRRRSRR SRR SRLS R RSS SS SD | 


1$1272: 


2$: 


3$: 
4$: 


5$: 


SEAR ARAEAEERAERAAKKRAREREREAAARAERAEAEERERERRAARRRERAERARARAARERD 


ERROR 


SRTEST 273 


MARAE LESLLSZALASLARRELASLSASASSASAALASSR RRA RARER R RR RAR EARS ARRAS ASE SS S| 


181273: 
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- N:C = 0110 


17- 
TEST 
25252,R4 ;RES B 
2525,R3 } 5 






SEQ 0114 
125252 


R3 sTEST THE COM 
3$ sN:C = 1001 ? 


2 ;COM FAILED TO ALTER THE CODES PROPERLY 
R4,R3 ZRESULT OK ? 

TST272 77BR IF YES 

2 ;COM DELIVERED THE WRONG RESULT 

COM DMO TEST - N:C = 1001 


7 CALL THE SCOPE LOOP UTILITY 


#272,R0 ;LOAD RO WITH TEST NUMBER 

a42$,R1 : LOAD R1 WITH TEST INSTRUCTION WORD 
R4 :RESULT S / B = 000000 

#-1,R3 ;CDEST] = 


sCLEAR CODES 
=N:C = 1001 
R3 : TEST THE COM 
3$ sN:C = 0101 ? 
3$ 
3$ 
4$ 
2 :COM FAILED TO ALTER THE CODES PROPERLY 


R4,R3 sRESULT OK ? 
TST273 :;BR IF YES 

2 :COM DELIVERED THE WRONG RESULT 
INC DMO TEST - N:C = 1011 


2 CALL THE ni LOOP UTILITY 
TEST NUMBER 


#273,RO ;LOAD RO WITH 

a4 2$,R1 : LOAD hs WITH TEST INSTRUCTION WORD 
R4 RESULT S /_B = 000000 

#-1,R3 EDEST J = 177777 


= CLEAR CODES 
iN:C = 1011 
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020126 
020130 


020140 


020142 
020144 


020146 


020150 


020174 
020176 
020200 
020202 
020204 
020206 
020210 


020212 
020214 


020216 


020220 


020246 


me 
poe 


17-S 


077777 


000275 
020244 


000001 
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1295 INC DMO TEST = N:C = 1071 SEQ 0115 
2$: INC R3 ;TEST THE INC 
I 3$ 3N:C = 0101 ? 

BNE 3$ 

BYS 3$ 

BCS 4$ 
3$: ERROR 2 7 INC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 RESULT OK ? 

BEC TST274 77BR IF YES 
5$: ERROR 2 INC DELIVERED THE WRONG RESULT 
s er cca TN AT pt ar a ge Et on at 
Z*TEST 274 INC DMO TEST - N:C = 0100 
WSS ASASESASLARASAAASESAASASSS AREA SSAA S RASS ASSAR RSA RSS SESE SASS SS Sf 
TS1274: 

SCOPE ;CALL {He SCOPE LOOP UTILITY 

MOV #274,R0 + LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #100000 ,R4 TRESULT S / B = 100000 

MOV #77777 ,R3 :CDESTJ = 77777 

ccc 2 ge CODES 

264 = 0100 
2$: INC R3 s TEST THE INC 

BPL 3$ iN:C = 1010 ? 

BEQ 3$ 

BYC 3$ 

BCC 4$ 
3$: ERROR 2 ; INC FAILED TO ALTER THE CODES PROPERLY 
4%: CMP R4,R3 RESULT OK ? 

BEQ TST275 ;:BR IF YES > 
5$: ERROR 2 7 INC DELIVERED THE WRONG RESULT 
S72 (LARA SASASLASESSSESESAS SE SASER RRR SESE RSA RRR ER ERR E SRR REARS RASS SASS SG 
*TEST 275 DEC DMO TEST - N:C = 1011 
SU RARER KD CARS SSSLASLALSLAASASSASLESSEES EAE SSA S SSE RR ESR ASRS RRS RRR RRS SS | 
TST275: 

SCOPE 7 CALL THE SCOPE LOOP UTILITY 

MOV #275,R0 LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ‘i OAD R1 WITH TEST INSTRUCTION WORD 

CLR RS RESULT S / B = 000000 

MOV #1,R3 :CDESTJ = 1 

CCC CLEAR CODES 

273 iN:C = 1011 
2$: DEC R3 TEST THE DEC 


BM] 3$ 3N:C = 0101 ? 


et KD11-K BASIC LOG 
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6212 


020250 
020252 
020254 
020256 


020260 
020262 


020264 


020304 
020310 
020312 
020314 


020316 


020324 
020326 


020330 
020332 


020334 


020356 
020360 


17=SEP=79 
001002 
102401 
103401 
104002 


020403 
001401 


104002 
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000276 
020314 
077777 
100000 


000277 
020360 
177777 
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T275 DEC DMO TEST = N:C = 10117 

BNE 3$ 

BVS 3$ 

BCS 4$ 
3$: ERROR 2 ;DEC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 sRESULT OK ? 

_ BEQ TST276 :7;BR IF YES 

5$: ERROR 2 DEC DELIVERED THE WRONG RESULT 
SLATER RARER ERA ERRERAARARARAEAAAEAAEREAEAARERHRAE RES 
:*TEST 276 DEC DMO TEST - N:C = 1100 
CLARA REA AEA AREER REREER ERE ERE EEE 
TST276: 

SCOPE ~ THE SCOPE LOOP UTILITY 

MOV #276,R0 OAD RO WITH TEST NUMBER 

MOV a#2$,R1 . ‘TOAD R1 WITH TEST INSTRUCTION WORD 

MOV #77777 ,R “RESULT S / B = 77777 

MOV #100000,R3 :CDEST] = 100000 

CCL ;CLEAR CODES 

274 sw:C = 1100 
2$: DEC R3 TEST THE DEC 

BM! 3$ iN:C = 0010 ? 

BEQ 3$ 

BVC 3$ 

BCC 4$ 
3$: ERROR 2 DEC FAILED TO ALTER THE CODES PROPERLY 
4$: C R4,R3 . SRESLAAT On ? 

BEQ TST277 :;BR IF YES 
5$: ERROR 2 :DEC DELIVERED THE WRONG RESULT 
Ce 
z*TEST 277 DEC DMO TEST - N:C = 0000 


SAREE REE REE ERR A RR EEREEREREEREREERAEEEEREEEEEEEARERERKEEREEE 


1§1277: 


SCOPE rr THE SCOPE LOOP UTILITY 
MOV #277,RO LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ‘fOAD - WITH TEST INSTRUCTION WORD 
MOV #-1,R4 TRESUL T S / B = 177777 
CLR R3 ‘DEST = 000000 
CCC CLEAR CODES 
2$: DEC R3 TEST THE DEC 


SEQ 0116 


CQKDA-E KDi1-K BASIC 
17-SEP-79 
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020366 
020370 
020372 


020374 
020376 


020400 


100003 
001402 
102401 
103001 


104002 


020403 
001401 


104002 


000300 
020426 
100000 


000301 
0204 76 
100000 
040000 
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DEC DMO TEST = N:C = 0000 SEQ 0117 

BPL 3$ 3N:C = 1000 ? 

BEQ 3$ 

BVS 3$ 

BCC 4$ 
3$: ERROR 2 ;DEC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 sRESULT OK ? 

BEQ TST300 7 7;BR IF YES 
58: ERROR 2 ;DEC DELIVERED THE WRONG RESULT 
Pee eee te mee eek ae mek eae ee 
:*TEST 300 ASL DMO TEST = N:C = 1060 

ABBA AAAALA£A2 2 SAS RZSSSESESEASAESRESESASSSESESESESE SESE SSSA RARER SSSA SAS SE 

+$1300: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #300,RO :7LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

CLR RS *RESULT S / B = 000000 

MOV #100000,R3 :CDESTJ = 100000 

CCC ;CLEAR CODES 

SEN :N:C = 1000 
2$: ASL R3 sTEST THE ASL 

BMI 3$ smz€ = O1T7 7 

BNE 3$ 

BVC 3$ 

BCS 4$ 
3¢: ERROR 2 sASL FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 sRESULT OK ? 

BEQ TST301 ; BR IF YES 
5$: ERROR 2 sASL DELIVERED THE WRONG RESULT 
DEREK ERE EERE EEE KERR EERE REE 
r*TEST 301 ASL DMO TEST - N:C = 0101 
FFARR EAR EER EERE EERE REE EERE EK 
TST301: 

SCOPE —_ THE SCOPE LOOP UTILITY 

MOV #301,R0 OAD RO WITH TEST NUMBER 

MOV a¥2$,R1 :Loap R1 WITH TEST INSTRUCTION WORD 

MOV #100000,R4 SULT S / B = 100000 

MOV #40000 ,R3 sCDEST, = 40000 

CCC CODES 

265 AR oO 
23: ASL RZ : TEST THE ASL 

BPL 3$ sNsC = 1010 ? 

BEQ 3$ 


CQKDA-E na BASIC LOGIC a 
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020506 
020510 


020512 
020514 


020516 


020540 
020542 
020544 


020552 
020554 


020556 
020560 


020562 
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103001 
104002 


020403 
001401 


104002 


000302 
020542 
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1301 ASL DMO TEST = N:C = 0101 


BCC 4$ 
3$. ERROR 2 ;ASL FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 ;RESULT OK ? 

BEQ TST302 ;7;BR IF YES 
5$: ERROR 2 ;ASL DELIVERED THE WRONG RESULT 
Satae. Geko ca ie diene cn ae a ae ee 
s*TEST 302 ASL DMO TEST = N:C = 0010 


FS RAAAARAARAARARAEARARARAAERRRARARRRRARARARARERAARERERAARARERRRRERE 


TST302: 


SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #302,R0 +:LOAD RO WITH TEST NUMBER 
MOV a#2$.R1 *LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 * RESULT S / B = 000000 
CLR R3 :(DEST] = 000000 
CCC [CLEAR CODES 
SEV iN:C = 0010 
2$: ASL R3 :TEST THE ASL 
BM! 3$ :N:C = 0100 ? 
BNE 3$ 
BVS 3$ 
BCC 4$ 
3$: ERROR 2 sASL FAILED TO ALTER THE CODES PROPERLY 
43: CMP R4,R3 aa i OK ? 
BEQ TST303 BR IF YES 
5$: ERROR 2 ZASL DELIVERED THE WRONG RESULT 
LL AAR AAA EEE E ERE EERE KERR ERAHEER REE 
T*TEST 303 ROL DMO TEST - N:C = 1101 
CLARA ARAEEAEREAEERARERERARAKEAERERAAERKEERRERARERKERERRERHEREE EE 
1$1303: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #303,RO [LOAD RO WITH TEST NUMBER 
MOV a#2$.R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #52525 RG “RESULT S / B = 52525 
MOV #125252,R3 *(DEST) = 125252 
CCC *CLEAR CODES 
275 : = 1101 
2$: ROL R3 : TEST THE ROL 
BM! 3$ IN:C = 0011 ? 
BEQ 3$ 
BVC 3$ 
BCS 4$ 
3$: ERROR 2 :ROL FAILED TO ALTER THE CODES PROPERLY 


SEQ 0118 


CQKDA=E KD11-K BASIC 
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020626 
020630 


020632 


020724 
020726 


020740 


020742 
020744 


020746 
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020403 
001401 


104002 


020403 
001401 


104002 
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000304 
020662 
125253 
052525 


000305 
020726 
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1303 ROL DMO TEST = N:C = 1101 


4$: CMP RG RB ;RESULT OK ? 

BEQ TST 304 :;BR IF YES 
S$: ERROR 2 :ROL DELIVERED THE WRONG RESULT 
re ae ee a a eee aee 
S*TEST 304 ROL DMO TEST = N:C = 0101 
fF TRARARARARARAARARARARAARRAERARAAKRARRARRARRAARAERRERAARARAREREREE 
151304: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #304,R0 OAD RO WITH TEST NUMBER 

MOV a#2$.R1 ‘i OAD R1 WITH TEST INSTRUCTION WORD 

MOV #125253,R4G SRESULT S / B = 125253 

MOV #52525 ,R3 *UDEST] = 52525 

CCC :CLEAR CODES 

265 N:C 0101 
2$: ROL R3 : TEST THE ROL 

BPL 3$ :N:C = 1010 ? 

BEQ 3$ 

BVC 3$ 

BCC 4$ 
3$: ERROR 2 ;ROL FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 [RESULT OK 

BEQ TST 305 ::BR IF VES. 
S$: ERROR 2 :ROL DELIVERED THE WRONG RESULT 
Pe a ee 
S*TEST 305 ROL DMO TEST - N:C = 0010 
ERA REREREREREAARAERAAREERAERAERERRKAKKEKEKKEE 
($1305: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #305,RO *:LOAD RO WITH TEST NUMBER 

MOV a#2$.R1 ‘(OAD R1 WITH TEST INSTRUCTION WORD 

CLR R4 “RESULT S / B = 000000 

CLR R3 :(DEST] = 000000 

CCC :CLEAR CODES 

SEV =N:C = 0010 
2$: ROL R3 s TEST THE ROL 

BMI 3$ :N:C = 0100 ? 

BNE 3$ 

BVS 3$ 

BCC 4$ 
3$: ERROR 2 :ROL FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4_R3 :RESULT OK ? 

BEQ TS17306 ‘BR IF YES 
S$: ERROR 2 :ROL DELIVERED THE WRONG RESULT 


SEQ 0119 


ae ay + faba 


QKDAE .P11 


z § 


PELLLTELS 
OOONANES Ww 


mronr 
MN— 


020774 
020776 


021010 


021012 
021014 


021016 


021020 


021054 
021056 


021060 
021062 


021064 


021066 


C 
5-79 


103401 
104002 


020403 
001401 


104002 


000306 
020776 
100000 
077777 


000307 
021044 


177777 
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1306 ADC DMO TEST = N:C = 0101 


Re ee en ne ee ee ee ee 


TeTEST 306 ADC DMO TEST = N:C = 0101 
gE TAARARARAAAARARARAAARAARAARARAAARAARARAARRAARARRARAARAAAREARHAEAD 
TST306: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #306,RO +:LOAD RO WITH TEST NUMBER 
MOV ar2$_R1 “LOAD R1 WITH Tes! INSTRUCTION WORD 
MOV #100000,R4 ‘RESULT S$ / B = 100000 
MOV #77777 RB “CDEST] = 77777 
CCC : CLEAR CODES 
265 = 0101 
2$: ADC R3 :TEST THE ADC 
BPL 3$ IN:C = 1010 ? 
BEG 3$ 
BVC 3$ 
BCC A$ 
3$: ERROR 2 :ADC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 :RESULT OK ? 
BEQ 1S1307 ;BR IF YES 
5$: ERROR 2 ZADC DELIVERED THE WRONG RESULT 
SF AARAAAAAAERAKAEERARERRARRAREERARARRAAERERRRAERAEARAAARAHRAAHARRARARARAR EH 
“RTEST 307 ADC DMO TEST - N:C = 1011 
LDA AREA RAAEEERREEREREEEERRERAAERARRERRAEAEARREAAERAEREREERERAHE 
TST307: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #307,R0 :LOAD RO WITH TEST NUMBER 
MOV a#2$_R1 “(OAD R1 WITH TEST INSTRUCTION WORD 
CLR RG “RESULT S$ / B = 000000 
MOV #-1,R3 SCDEST] = 177777 
CCC : CLEAR CODES 
273 “N:C = 1011 
2$: ADC R3 <TEST THE ADC 
BM! 3$ :N:C = 0101 ? 
BNE 3$ 
BVS 3g 
BCS A$ 
3$: ERROR 2 :ADC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4_R3 ;RESULT Ok ? 
BEO TS7310 BR IF YES 
5$: ERROR 2 :ADC DELIVERED THE WRONG RESULT 


SL AAA ARR ERERARAAEARERRAEAEARRRAAKRAEREERAEAARKARARERREEEA EERE AE EER S 


“STEST 310 ADC DMO TEST - N:C = 1010 


SS AARAARAAAAAAAAARAAAAAARAAARAAAAAAHHAEAAHRAAA RARER RAH KReAHKeeNAee 


1ST310: 


SEQ 0120 
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CQKDA=E KD11=K BASIC LOGIC TESTS MACY 
CQKDAE .P 7=SEP=79 09:47 1310 ADC DMO TEST = N:C = 1010 SEQ 0121 
6468 021066 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
6469 021070 012700 000310 MOV #310,R0 + LOAD RO WITH TEST NUMBE R 
6470 021074 013701 021114 MOV a72$,R1 *LOAD R1 WITH TEST INSTRUCTION WORD 
6471 021100 012704 177777 MOV #-1 RG SRESULT S$ / B = 177777 
6472 021106 012703 177777 MOV #-1,R3 :(DEST] = 177777 
6473 021110 000257 CCC “CLEAR CODES 
are 021112 000272 272 tN:C = 1010 
6476 021114 005503 28: ADC RZ :TEST THE ADC 
6478 021116 100003 BPL 3$ su:€ = 1000 ? 
6479 021120 001402 BEQ 3$ 
6480 021122 102401 BVS 3 
rer 021124 103001 BCC 4% 
6483 021126 104002 38: ERROR 2 sADC FAILED TO ALTER THE CODES PROPERLY 
6485 021130 020403 4$: CMP R4,R3 RESULT OK ? 
6486 021132 001401 BEQ 1S$7311 -;BR IF YES 
6488 021134 104002 S$: ERROR 2 :ADC DELIVERED THE WRONG RESULT 
6490 SC TAA AARAREARAERARRERERARRAARRAERAARRAAERRAERRARRRRARRAHARRARRERAERED 
6491 s*TEST 311 SBC DMO TEST - N:C = 1011 
6492 DL RR EEE REE EA RE RA RE RE REE EE AREER 
6493 021136 1$1311: 
6494 021136 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
6495 021140 012700 000311 MOV #311,R0 :LOAD RO WITH TEST NUMBER 
6496 021144 013701 021162 MOV aA2$,R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
6497 021150 005004 CLR R4 “RESULT S / B = 000000 
6498 021152 012703 000001 MOV #1,R3 :CDESTJ = +1 
6499 021156 000257 CCC :CLEAR CODES 
6300 021160 000273 273 iN:C = 1011 
6302 021162 005603 23: SBC R3 :TEST THE SBC 
6504 021164 100403 BM! 3$ iN:C = 0100 ? 
6505 021166 001002 BNE z$ 
6506 021170 102401 BVS 3$ 
6307 021172 103001 BCC 4$ 
6309 021174 104002 3$: ERROR 2 :SBC FAILED TO ALTER THE CODES PROPERLY 
6511 021176 020403 4$: CMP R4,R3 sRESULT OK ? 
6312 021200 001401 BEQ TST312 :;BR IF YES 
6314 021202 104002 5$: FRROR 2 :SBC DELIVERED THE WRONG RESULT 
6516 DR RR RT TTT TERRE RR E RE EREREE RRA RENEE ERR ERED 
6517 SeTEST 312 SBC DMO TEST - N:C = 0101 
6518 LLU RRR REE RETREAT EARER REAR ERRATA EE 
6519 021204 157312: 
6520 021204 000004 SCOPE ZCALL THE SCOPE LOOP UTILITY 
6521 021206 012700 000312 MOV #312,R0 *:LOAD RO WITH TEST NUMBER 
6522 021212 013701 021232 MOV a42$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
6523 021216 012704 077777 MOV #077777,R6 SRESULT S / B = 077777 
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021222 
021226 
021230 


021232 


021242 
021244 


021246 
021250 


021252 


021254 
021254 


021312 
021314 


021316 
021320 


021322 


021324 


)12703 
57 


103001 
104002 


020403 
001401 


104002 


100000 


000313 
021302 
000001 
000001 


000314 
021350 
177777 


10 
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T7312 SBC DMO TEST = N:C = 0101 

MOV #100000 ,R3 ;(DEST] = 100000 

CCC ;CLEAR CODES 

265 sN:C = 0101 
]f: SBC R3 ZTEST THE SBC 

BM] 3$ iN:C = 0010 ? 

BEQ 3$ 

BVC 3$ 

BCC 4% 
3$: ERROR 2 ;SBC FAILED TO ALTER THE CODES PROPERLY 
4% CMP R4,R3 ZRESULT OK ? 

BEQ TS7313 + :BR IF YES 
5$: ERROR 2 :SBC DELIVERED THE WRONG RESULT 
SLA AAARARARAEARARAARARAREERERERAARAERAAARRRAARARRRARRAERETARAHER 
s*TEST 313 SBC DMO TEST = N:C = 1110 
FLARE RAAAAAAAAEARAERARAERAHRAERARAAERARREARARARAAARARAEERAERRRREH REDD 
i Ee 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #313,R0 ;7LOAD RO WITH TEST NUMBER 

MOV a42$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #1,R4 sRESULT S 4 6-217 

MOV #7 ,R3 :CDESTJ = 

cre 7 CLEAR CODES 

276 =N:C = 1110 
2$: SBC R3 s TEST THE SBC 

BM] 3$ iN:C = 0000 ? 

BEQ 3$ 

BVS 3$ 

BCC 4$ 
3$: ERROR é :;SBC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 ZRESULT OK ? 

BEQ TST314 = sn If YES 
5$: ERROR 2 ;SBC DELIVERED THE WRONG RESULT 
CF AAAAAAAAAAAAAARAAEAAAHAEAREERARARARRARAAAAEARKAHRARAAREHR AHA EAE 
seTEST 314 SBC DMO TEST - N:C = 0111 
CL AAA AARAAAAAERAAARERRAERAERAKKERARARARARARAARAEARAAAERARAAAERHAER ES 
TS7T314: 

SCOPE : CALL THE SCOPE LOOP UTILITY 

MOV #314,R0 :LOAD RO WITH TEST NUMBER 

MOV af2$,R1 “LOAD i WITH TEST INSTRUCTION WORD 

MOV #-1,R4 sRESULT S / B = 177777 

CLR R3 ‘tbeST a = 000000 

CCC *CLEAR CODES 

267 SNC = O1T1 


SEQ 0122 


= 
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021350 
021352 


021370 


021372 


021416 
021420 
021422 
021424 
021426 
021430 
021432 


021434 
021436 


021440 
021442 


021444 


021474 
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005603 
100003 
001402 
102401 
103401 
104062 


020403 
001401 


104002 


000004 
012700 
013701 
012702 


102401 
103001 


104601 


020412 
001402 


011203 
104001 
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000315 
021420 
063316 


000316 
021476 
063316 


177777 
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1314 SBC DMO TEST = N:C = 017 


23: SBC R3 s TEST THE SBC 

BPL 3$ sN:C = 1001 ? 

BEQ 3$ 

BVS 3$ 

BCS 4$ 
3$: ERROR 2 ;SBC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP RG ,R3 ;RESULT OK ? 

BEQ TST315 ; BR IF YES 
58: ERROR 2 ;SBC DELIVERED THE WRONG RESULT 
a er ee a Se eee ee 
:eTEST 315 TST DM? TEST = N:C = 1011 
CLARA AAAAAARARARAARAERRAAERERARAAERARARRSRRAERARRARARAREARREREE 
TST313< 

SCOPE = CALL THE SCOPE LOOP UTILITY 

MOV #315,R0 ;LOAD RO WITH TEST NUMBER 

MOV a42$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUF O,R2 ;DEST ADDR = MBUFO 

CLR RS RESULT S / B = 000000 

CLR (R2) :CDESTJ = 000000 

CCC ;CLEAR CODES 

273 N:C=101 
2s: TST (R2) sTEST THE TST 

BM] 3$ iN:C = 0100 ? 

BNE 3$ 

BVS 3$ 

BCC 4% 
3$: ERROR 1 ;TST FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) ZRESULT OK ? 

BEQ TST316 77BR IF YES 

MOV (R2) ,R3 ;GET THE WAS DATA 
5$: ERROR 1 ;TST ALTERED THE CDESTI 
CLEAR ARAARRAAEEERRAERREEEERRERRAARARAEAREERARAAAEAEAAHERRAAKERR AEE REREH 
s*TEST 316 TST DM1 TEST = N:C = 0100 
CLEARER AERA AAR ERERAERERERREERAEAAAEEAEREREEATEAAERERARAAEHH REED 
1S1316: 

SCOPE = CALL THE SCOPE LOOP UTILITY 

MOV #316,R0 :LOAD RO wITH TEST NUMBER 

MOV a2$,R1 - = LOAD R1 WITH TEST INSTRUCTION WORD 

oy ania ;DEST ADDR = MBUFO 

i. 

COM R4 *RESIAT S$ / 8 =.07 777? 

MOV #-1,(R2) :(DEST] = 177777 

CCC :CLEAR CODES 

264 3N:C=0100 


SEQ 0123 


eel 
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021476 


021510 


021512 
021514 


021516 
021520 


021522 


021564 


021574 
021576 


021600 
021602 


021604 
021606 


021610 


021626 
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005712 
100003 
901402 
102401 
103001 
104001 


020412 
001402 


011203 
104001 


000004 
012700 
013701 


032737 
001401 
000 


000 
012702 
005004 
012712 
000257 
000273 
005012 
100403 
001002 
102401 
103001 
104001 


020412 
001402 


011203 
104001 


000004 
012700 
013701 
012702 
005004 
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000317 
021564 


000100 


063316 
177777 


RLS 
WO 
ARS 


wo 
WOW 


063240 





H 10 
+ i 30A(1052) 17=SEP=79__ 09:55 PAGE 125 
1316 TST DOM? TEST = N:C = 0100 


2$: TST (R2) ; TEST THE TST 

BPL 3$ su:C = 1000 ? 

BEQ 3$ 

BVS 3$ 

BCC 4% 
33: ERROR 1 ;TST FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) non iF OK ? 

BEQ TST317 ;;BR IF YES 

MOV (R2) ,R3 ;GET THE WAS DATA 
5$: ERROR 1 :TST ALTERED THE (DEST) 
SC AAAARAAARARARERAERERAAARERERAERRARRRRRRERRAERRARARRARARAHRARRRAAED 
s*TEST 317 CLR DM1 TEST = N:C = 10117 
CC AAAAAARAAAARAAARRAAAARRARRARKARKAARRRAARRARARRRARRAREAARRRARHARED 
TST317: 

SCOPE apy THE SCOPE LOOP UTILITY 

a #317,R0 ZLOAD RO WITH TEST NUMBER 


a4 2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
- SBITL ust CONTROLLED BREAKPOINT -- BIT6 
#B1T6, 4#BPT ;BREAKPOINT HALT SET ?? 
BEO -*4 ;BR_IF NOT 


HALT TBREAK = DEPRESS CONTINUE TO RESTART 

MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

CLR R4 “RESULT S$ / B = 000000 

MOV #1, (R2) “(DEST] = 179777 

(aaa “CLEAR CODES 

273 -N:C = 10TT 
2$: CLR (R2) TEST THE CLR 

BMI 3$ :N:C = 0100 ? 

BNE 3$ 

BVS 3$ 

BCC 4$ 
3$ ERROR 1 :CLR FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4, (R2) :RESULT OK ? 

BEQ TST320 :;BR IF YES 

MOV (R2),R3 :GET THE WAS DATA 
5$: ERROR 1 “CLR DELIVERED THE WRONG RESULT 
SGA REE ERA EERE ERATE AEKAERAER AREER ED 
S*TEST 320 CLR DM2 TEST - N:¢ = 0000 
SF AAA AREER AERA AAA REREEERAERE RARER KAKEEEKKER RK EH E HE 
787320: 

SCOPE x :CALL THE SCOPE LOOP UTILITY 

MOV #320,R0 *:LOAD RO WITH TEST NUMBER 

MOV a#2$_R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUF 0.R2 ‘DEST ADDR = 


Poy FQ 
CLR R4 RESULT S = 000000 


SEQ 0124 
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021630 
021634 


021650 


021652 
021656 


021660 


021662 
021664 


021666 
021670 


021672 


021720 
021722 


021724 
021726 


1730 - 


02 
021732 
021734 


021742 


021744 
021746 


021750 
021750 
021752 


013712 063330 
000257 


022702 063320 
001401 


104005 


020442 
001402 


011203 
104001 


0127 
012712 052525 


011203 
104001 


000004 
012700 000322 


CY 
7320 


7$: 
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CMP 
BEQ 


MOV 
ERROR 
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CLR DM2 TEST = N:C = 0000 


@ADWTA+2, (R2) 


: 


5 


R4,-(R2) 
TS1321 


(R2) ,R3 
' 


sCDEST] = 177777 
;CLEAR CODES 


; TEST THE CLR 


= 0100 ? 


;CLR FAILED TO ALTER THE CODES PROPERLY 
;DID CLR INCREMENT DEST REG 
;BR IF YES 


:CLR FAILED TO UPDATE DEST REG 


sRESULT OK ? 


Ese IF YES 


GET THE WAS DATA 
CLR DELIVERED THE WRONG RESULT 


FC AAA AAAAAARAEERERAEEKKEKRAAAEKREAAARARAEKARAKARAAAAAARAARRAARAERE EH 


s*TEST 321 


1$1321: 


es: 


3S: 
4$: 


5$: 


BEQ 


MOV 
ERROR 


COM DM1 TEST = N:C = 0110 


| SRARARAEREAAARARAEREAKERAREARARKARRAARRAARAARRARAAARRAKRRRARRAARRRARS 


#52525, (R2) 


R4,(R2) 
TST322 


aaliees 


;CALL_ THE SCOPE LOOP UTILITY 

;;LOAD RO WITH TEST NUMBER 

[LOAD R1 WITH TEST INSTRUCTION WORD 
DEST ADDR = MBUFO 

RESULT S / B 


= 125252 
;CDESTIJ = 5 5 
: CLEAR CODE 

= 0110 


25 2 
Ss 


;TEST THE CLR 
zN:C = 1001 ? 


; COM FAILED | TO ALTER THE CODES PROPERLY 
:RESUL OK 
;;BR IF YES” 


:GET THE WAS DATA 
*COM DELIVERED THE WRONG RESULT 


, LEAR AEE A AERA RAAERRAEARARAERERAARAARAARAERAAREAEAERER AREER REE 


SeTEST 322 


1$1322: 


SCOPE 


COM DM? TEST = ":C = 1001 


LL AAR AERA AAA AAEEARAARAERAAAERAERAAEAAARARAAAEEAREKKAR ERA e RED 


#322,R0 


:CALL_ THE SCOPE LOOP UTILI 
;;LOAD RO WITH TEST NUMBER 


TY 


SEQ 0125 | 
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021756 
021762 
02 


021776 
022000 
022002 
022004 
022006 
022010 
022012 
022014 
022016 


022020 
022022 


022024 


022052 
022054 
022056 
022060 
022062 
022064 
022066 
022070 
022072 


022074 
022076 


0 
022112 


013701 
012702 
005004 
012712 
000257 
000271 
005112 
100403 
001002 
102491 
103401 
104001 
020412 
001402 


011203 
104001 


102401 


011203 
104001 


012702 


CQKDA=E KD1i=-K BASIC LOGIC TESTS MA 
17=SEP=79 09:47 13 


022000 
063316 


177777 


2$: 


3$: 
4%: 


5$: 


oe 
-* 
. 


TS 


177777 
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22 COM 





DM] TEST = N:C = 1001 SEQ 0126 
MOV = @#2$,,R1__ ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV  - #MBUFO,R2 :DEST ADDR = MBUFO 
CLR RG :RESULT S { 8 = 000000 
MOV = #=1,, (R2) :CDEST) = 
CCC : CLEAR coves” 
271 iN:C = 1001 
COM (R2) ;TEST THE COM 
BMI 3$ iN:C = 0101 ? 
BNE 3$ 
BVS 3$ 
acs 4S 
ERROR 1 :COM FAILED TO ALTER THE CODES PROPERLY 
(MP RG, (R2) ;RESULT Ok 
BEQ TS1323 SBR IF YES. 
MOV (R2) ,R3 GET THE WAS DATA 
ERROR 1 COM DELIVERED THE WRONG RESULT 
“ent tte PRR R ERR REREERERRREREARERLER SARS RA SAR SAS RAR RA RRR RSA ASRS SE SS 
TEST 323 INC DM1 TEST = N:C = 1011 | 
went f Pee RRRREERRRRRRRRRRERERRRR SRR SESR ARRAS ARRSRA RSA AREER SESS SS | 
1323: 
SCOPE CALL THE SCOPE LOOP UTILITY 
MOV #323, RO LOAD RO WITH TEST NUMBER 
MOV = #28. :LOAD R1 WITH TEST INSTRUCTION WORD 
MOV  #MBUFO.R2 :DEST ADDR = MBUF 
CLR RG RESULT S / B = 000000 
MOV = #1, (R2) >CDEST) = 177777 
CCC CLEAR CODES 
273 iN:C = 1011 


es: 


3$: 


4$: 


5$: 


ee ee a 


. 
-* 
. 


15 


TEST 324 INC DM1 TEST - N:C = 0100 
SII II IIIOIIIUIUIOIIOIOIISIOIOIOIIOIOISIUIOIOIDIOIOISIOIDIOISIDIOIOIOIOIOIOSIDIOISOIUI II Ot 
1324 
SCOPE ¢ CALL THE SCOPE LOOP UTILITY 
MOV #324 ,RO0 LOAD RO WITH TEST NUMBER 
MOV af 2$,R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 





INC (R2) i; TEST THE INC 
BM! 3$ 3N:C = 0101 ? 


ERROR 1 INC FAILED TO ALTER THE CODES PROPERLY 
CMP R4,(R2) RESULT OK ? 
BEQ TST324 :;BR IF YES 


MOV (R2) ,R3 ;GET THE WAS DATA 
ERROR 1 7 INC DELIVERED THE WRONG RESULT 









[DEST ADDR = MBUFO 
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Seeeeereceseses 


LEBEEEEES 


ge 
ow 


6821 
6822 


022116 


022130 
022132 


022140 
022142 


022144 
022146 
022150 


022152 
022154 


022156 


022206 


022216 
022220 
022222 
022224 


022226 
022230 


022232 


022254 
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012704 


011203 
104001 


001002 
102401 


01 
012712 


000325 
022206 
063316 


000001 


100000 
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1324 INC DM] TEST = N:C = 
MOV #100000 ,R4 
MOV #77777 ,(R2) 
CCC 
264 
2$ INC (R2) 
BPL 3$ 
BEQ 3$ 
BVC 3$ 
BCC 4$ 
3$: ERROR 1 
4$: CMP R4,(R2) 
BEQ TST325 
MOV (R2) ,R3 
5$: ERROR 1 


= 4100000 
7 


;TEST THE INC 
= 1010 ? 


7 INC ta -¥ TO ALTER THE CODES PROPERLY 
RESULT 
;;BR IF YES. 


;GET THE WAS DATA 
;INC DELIVERED THE WRONG RESULT 


SEERA ERR KERR ERK EKER AREER 


DEC DM1 TEST - N:C = 


1011 


ene eee ee ee ERE ERRESEAARRARESERAAS SAS SAASAR ARERR SARA RAAS SARA SARA SO 


=®TEST 325 

1$1325: 
SCOPE 
MOV #325,R0 
MOV av2$,R1 
MOV AMBUFO,R2 
CLR R4 
MOV #1, (R2) 
CCC 
273 

2$: DEC (R2) 
BMI 3$ 
BNE 3$ 
BVS 3$ 
BCS 4$ 

3$: ERROR 1 

4$: CMP R4, (R2) 
BEQ TST326 
MOV (R2) ,R3 

S$: ERROR 1 


;CALL THE SCOPE LOOP UTILITY 
+ LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
“DEST ADDR = MBUFO 

;RESULT S / B = 000000 

:CDESTJ = 1 
;CLEAR CODES 
sNzC = 1077 


TEST THE DEC 
= 0101 ? 


as FAILED | TO ALTER THE CODES PROPERLY 
RESULT OK 
:;BR IF YES” 


GET THE WAS DATA 
;DEC DELIVERED THE WRONG RESULT 


SD EERE 


S*TEST 326 


DEC DM1 TEST - N:C = 


1109 


SRA RRR EKER RARER KERR REE ERE ERE AERA REAR ERE 


TST326: 
SCOPE 
MOV #326.R0 
MOV a#2$,R1 
MOV AMBUFO,R2 
MOV 477777 RS 
MOV #100000, (R2) 


:CALL_THE SCOPE LOOP UTILITY 

7:LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
:DEST a wy MBUF 0 

RESULT S / B = 77777 
:CDESTJ = 100000 


— 


SEQ 0127 
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CQKDAE .P11 17=SEP=79 09:47 T1326 ~=—dDEC:~«DM) «TEST = N:C = 1100 SFQ 0128 

6860 022260 000257 CCC ZCLEAR CODES 

6861 022262 000274 274 =N:C = 1100 

6863 022264 005312 2$: DEC (R2) :TEST THE DEC 

6865 022266 100403 BMI 3$ iN:C = 0010 ? 

6866 022270 001402 BEQ 3$ 

6867 022272 102001 BVC 3$ 

6868 022274 103001 BCC 4$ | 

6870 022276 104001 3$: ERROR 1 :DEC FAILED TO ALTER THE CODES PROPERLY 

6871 022300 020412 4$: CMP R4, (R2) SRESULT OK ? 

6872 022302 001402 BEQ TST327 :;BR IF YES 

6874 022304 011203 MOV (R2) ,R3 :GET THE WAS DATA 

6875 022306 104001 5$: ERROR 1 ‘DEC DELIVERED THE WRONG RESULT 

6877 es a ee 

6878 S*TEST 327 DEC DM1 TEST - N:C = 0000 

6879 VERO eRRSSRASAASSASSALAL EASES ASSESSES SES ES ESSERE SSAA ARREARS RS RSA SSSR SSS SE SY 

6880 022310 1$1327: 

6881 022310 000004 SCOPE :CALL THE SCOPE LOOP UTILITY - 

6882 022312 012700 000327 MOV #327,R0 *:LOAD RO WITH TEST NUMBER 

6883 022316 013701 022336 MOV av2$,R1 *LOAD R1 WITH TEST INSTRUCTION WORD 
022322 012702 063316 MOV #MBUFO,R2 “DEST ADDR = 

6885 022326 012704 177777 MOV #-1, ‘RESULT S / B = 177777 

6886 022332 005012 CLR (R2) :CDESTJ = 000 

6887 022334 000257 CCC CLEAR CODES 

6889 022336 005312 2$: DEC (R2) :TEST THE DEC 

6891 022340 100003 BPL 3$ :N:C = 1000 ? 

6892 022342 0014 BEQ 3$ 

6893 022344 102401 BVS 3$ 

689% 022346 103001 BCC 4$ 

6896 022350 104001 3$: ERROR 1 :DEC FAILED, TO ALTER THE CODES PROPERLY 

6897 022352 020412 4$: CMP R4, (R2) RE SUL 

6898 022354 001402 BEQ TST330 : BR rH ves 

6900 022356 011203 MOV (R2) ,R3 :GET THE WAS DATA 

6901 022360 104001 5$: ERROR 1 “DEC DELIVERED THE WRONG RESULT 


LURE REAR ERK KERR ERE EERE EERE EEA EERE ERE AREER 


;*TEST 330 ASL DM1 TEST - N:C = 1000 


WEDS ESESAARARRRESSASARSARARSSR SARA SRERRRARER SARE RRR RRR RRR RRR RRS SD SD | 


TST330: 
7 CALL THE nt te LOOP UTILITY 
000330 #330,RO ;;LOAD RO WITH TEST NUMBER 

022412 a#2$,R1 :LOAD R1 ee TEST INSTRUCTION WORD 
063316 A#MBUF 0 ,R2 : 


R4 
100000 #190000, (R2) 


022 
022410 
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CQKDA=E KD11=K BASIC LOGIC TE 
CQKDAE .P11 17-SEP-79 09:47 7330 ASL DM1 TEST = N:C = 1000 SEQ 0129 
pode | 022412 006312 2$: ASL (R2) TEST THE ASL 
6918 022414 100403 BMI 3$ 3N:C = 0111 ? 
6919 022416 001002 BNE 3$ 
6920 022420 102001 BVC 3$ 
oS 022422 103401 BCS 4$ 
6923 022424 104001 3$: ERROR 1 ;ASL FAILED TO ALTER THE CODES PROPERLY 
6924 022426 020412 4$: CMP R4,(R2) RESULT OK ? 
#24 022430 001402 BEQ TS1337 ;:BR IF YES 
6927 022432 011203 MOV (R2) ,R3 :GET THE WAS DATA 
onse 022434 104001 5$: ERROR 1 ;ASL DELIVERED THE WRONG RESULT 
6930 [| pee eaten agin eaeiann ea alae amine , 
6931 *TEST 331 ASL DM1 TEST = N:C = 0101 
6932 DOI IIIIIIIOIIIIDIDIDIOIIIIUIDIOIDIOIOIUIDIOIDIOIUIUIDIDIDIIIOIUIDIDIDISINIIDIDIDIOIUIOIDIDIDININIOIDIDIOIE 
6933 022436 TST331: 
6934 022436 000004 = SCOPE ;CALL THE SCOPE LOOP UTILITY 
6935 022440 012700 000331 MOV #331,R0 3zLOAD RO WITH TEST NUMBER 
6936 022444 013701 022470 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
6937 022450 012702 063316 MOV AMBUF 0 ,R2 ;DEST ADDR = MBUFO 
6938 022454 012704 100000 MOV #100000 ,R4 :RESULT S / B = 100000 
6939 022460 012712 040000 MOV #40000, (R2) :CDESTJ = 40000 
6940 022464 000257 CCC ;CLEAR CODES 
eee 022466 000265 265 iN:C = 0101 
er 022470 006312 2$: ASL (R2) TEST THE ASL 
6945 022472 100003 BPL 3$ iN:C = 1010 ? 
6946 022474 001402 BEQ 3$ 
6947 022476 102001 BVC 3$ 
9 022500 103001 BCC 4$ 
6950 022502 104001 3$: ERROR 1 7 ASL FAILED | TO ALTER THE CODES PROPERLY 
6951 022504 020412 4$: CMP R4,(R2) RESULT OK 
oe 022506 001402 BEQ TST332 ;3BR IF vES. 
6954 022510 011203 MOV (R2) ,R3 ;GET THE WAS DATA 
+434 022512 104001 5$: ERROR 1 ;ASL DELIVERED THE WRONG RESULT 
6957 | ooo ge -taeai aeaiatpniapnintm einen saad atta aie cee ER 
6958 i*TEST 332 ASL DM1 TEST - N:C = 0010 
6959 TRIO IO III IIIISIIIOIDIIIOIUICI IOI TOTO I TOT I TOI ITT TOIT 
6960 022514 i$1332: 
6961 022514 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
6962 022516 012700 000332 MOV #332,RO0 7;LOAD RO WITH TEST NUMBER 
6963 022522 013701 022542 MOV af#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
6964 022526 012702 063316 MOV A#MBUF 0 ,R2 DEST oon = MBUF 
6965 022532 005004 CLR R4 RESULT S / “B= 000000 
6966 022534 005012 CLR (R2) best) = 000000 
6967 022536 000257 ccc :CLEAR CODES 
~— 022540 000262 SEV iN:C = 0010 
6970 022542 006312 2$: ASL (R2) STEST THE ASL 
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CQKDAE .P11 


022544 


022552 
022554 


022616 
022620 
022622 


022630 
022632 
022634 
022636 


02 

022672 
022674 
022676 


022700 
022702 


011203 
104001 


103401 
104001 
020412 
001402 
011203 
104001 


100003 
001402 


000333 
022620 
063316 
052525 
125252 


053535 
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1332 ASL DM1 TEST = N:C = 0010 


BMI 3$ ZN:C = 0100 ? 

BNE 3$ 

BVS 3$ 

Bcc 4$ 
3$: ERROR 1 sASL FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4, (R2) “RESULT OK ? 

BEQ TS7333 ;;BR IF YES 

MOV (R2) .R3 ZGET THE WAS DATA 
S$: ERROR 1 SASL DELIVERED THE WRONG RESULT 
LL AAR AAR EEERRERREKREEEE KERR EKER ERE ERE 
s*TEST 333 ROL DM1 TEST = N:C = 1101 
CAAA RARER ERE REE EEE REE EERE ERE EE 
TS7333: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #333,R0 ;zLOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUF 0,R2 :DEST ADDR = MBUFO 

MOV #52525 RG TRESULT S / B = 52525 

MOV #125252, (RZ) =(DEST] = 128252 

CCC [CLEAR CODES 

275 *N:C = 1101 
es: ROL (R2) TEST THE ROL 

BMI 3$ iN:C = 0011 ? 

BEQ 3$ , 

BVC 3$ 

BCS 4$ 
3$: ERROR 1 ZROL FAILED | TO ALTER THE CODES PROPERLY 
4$: CMP RG, (R2) sRESULT OK 

BEQ TST334 + :BR IF =." 

MOV (R2) ,R3 :GET THE WAS DATA 
5$: ERROR *ROL DELIVERED THE WRONG RESULT 
1 Stag gato tng tt allan OF aie ak in a isi oi fi 
s*TEST 334 ROL DM1 TEST - N:C = 0101 


SRR EERE ERE REREEREAE RE RE ERE ERREER EEE REKEER EEE 


1$1334: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #334,R0 LOAD RO WITH TEST NUMBER 
MOV av2$.R1 ‘TOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUF 0.R2 ‘DEST ADDR = MBUFO 
MOV #125253,R4 “RESULT S$ / B = 125253 
MOV #52525, (R2) ‘(DEST = 52525 
CCC “CLEAR CODES 
265 *N:C = 0101 
2%: ROL (R2) : TEST THE ROL 
BPL 3$ :N:C = 1010 ? 


BEQ 3$ 


SEQ 0130 
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C 
1334 ROL DM? TEST = N:C = 0101 SEQ 0131 


BVC 3$ 

BCC 4$ 
3$: ERROR 1 ROL tee TO ALTER THE CODES PROPERLY 
4$: CMP RG, (R2) #RESUL T OK ? 

BEQ 7TS$7335 7 BR iF YES” 

MOV (R2) ,R3 ;GET THE WAS DATA 
53: ERROR 1 ROL DELIVERED THE WRONG RESULT 
RRR AARAEARAARAAERARERARARARARARERAARAARARREARRRAKRERERAKEKREKREAE 
T&TEST 335 ROL DM1 TEST = N:C = 0010 
WEAR ARBAAARARASASSAAERSAS SASSER EERE RE REE SRS RARE RRR ERR AAAS RRS EERE SS SE 
1$1335: 

SCOPE ey THE SCOPE LOOP UTILITY 

MOV #335,R0 OAD RO WITH TEST NUMBER 


‘OAD R1 WITH TEST INSTRUCTION WORD 
MBUF 0 


MOV AMBUF 0 ,R2 :DEST ADDR = 
CLR R4 :RESULT S$ / B = 000000 
CLR (R2) ;CDESTJ = 000000 
ccc SCLEAR CODES 
SEV 3N:C = 0010 
23: ROL (R2) TEST THE ROL 
BM] 3$ = 0100 ? 
BNE 3$ 
BVS 3$ 
BCC 4$ 
3$: ERROR 1 ;ROL FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4, (R2) sRESULT OK ? 
BEQ TS1336 3:BR IF YES 
MOV (R2) ,R3 GET THE WAS DATA 
5$: ERROR 1 ;ROL DELIVERED THE WRONG RESULT 


De 


i*TEST 336 ADC DM1 TEST - N:C = 0101 


WEA eee RRR REESE RRRRRERRRARERR RRR RE RSA R ERAS RRR RRR RRR SERRA SESS SO | 


187336: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
V #336,RO OAD RO WITH TEST NUMBER 
MOV a#2$.R Atory R1 WITH TEST INSTRUCTION WORD 
MOV UF 0 “DEST ADDR = but 0 
MOV #100000,R4 “RESULT S$ / B = 100000 
MOV #77777, (R2) :CDEST] = 47877 
CCC SCLEAR CODES 
265 =N:C = 0101 
2$: ADC (R2) :TEST THE ADC 
BPL 3$ :N:C = 1010 ? 
BEQ 3$ 
BVC 3$ 
BCC 4$ 


C 


NNNN 


N 
SO 


NNNN 
— aed ot oo ss a 
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1336 ADC DM1 TEST = N:C = 0101 


3$: ERROR 1 ;ADC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP RG, (R2) SRESULT OK ? 

BEQ TS1T337 ;7;BR IF YES 

MOV (R2) ,R3 ;GET THE WAS DATA 
5$: ERROR 1 ;ADC DELIVERED THE WRONG RESULT 
LRA RARER EEE RARER ERROR RRR REE Ee 
s*TEST 337 ADC DM1 TEST = N:C = 1011 


J [RRA RAAAAARARERAREREERARRAERERRERERRARERARAREARARARARRERERARERENS 


TS1337: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #337,R0 +; LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 

MOV AMBUFO,R2 [DEST ADDR = MBUFC 

CLR RG sRESULT S / 8B = 000000 

MOV #-1,(R2) :CDEST] = 177777 

CCC ;CLEAR CODES 

273 sN:C = 10117 
23: ADC (R2) ;TEST THE ADC 

BM] 3$ sN:C = 0101 ? 

BNE 3$ 

BVS 3$ 

BCS 4$ 
3$: ERROR 1 SADC FAILED | TO ALTER THE CODES PROPERLY 
4$: CMP R4,(R2) nn ie OK 

BEQ TST340 ;;BR IF S. 

MOV (R2) ,R3 :GET THE WAS DATA 
5$: ERROR 1 zADC DELIVERED THE WRONG RESULT 
LEAR AERA EERE ER EEREREREERERERRERREEARAE RARER RES 
s*TEST 340 ADC DM1 TEST = N:C = 1010 
LTA RERREEE AREER EERE ERERERRERERREERERRERARREEREA REE 
TST340: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #340,R0 *:LOAD RO WITH TEST NUMBER 

MOV af2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

MOV #-1,R4 sRESULT S / 8B = 177777 

MOV #-1,(R2) : (DEST) = 177777 

CCC ;CLEAR CODES 

272 :€ = 1010 
es: ADC (R2) ; TEST THE ADC 

BPL 3$ iN:C = 1000 ? 

BEQ 3$ 

BVS 3$ 

BCC 4$ 
3$: ERROR 1 sADC FAILED TO ALTER THE CODES PROPERLY 





SEQ 0132 


on 
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CQKDAE .P11 17-SEP-79 09: ADC DM! TEST = N:C = 1010 SEQ 0133 
7140 023174 020412 4$: CMP R4,(R2) RESULT OK ? 
ree 023176 001402 BEQ TS1341 3;BR IF YES 
7143 023200 011203 MOV (R2) ,R3 ;GET THE WAS DATA 
ee 023202 104001 5$: ERROR 1 ;ADC DELIVERED THE WRONG RESULT 
7146 PERRET E RAAT ARETE R REAR E RARER Eee 
7147 peTEST 341 SBC DM1 TEST = N:C = 10117 
7148 LLU REET RRR TATE R EATER ERATE Eee 
7149 023204 TST341: 
7150 023204 000004 SCOPE 7 CALL THE SCOPE or UTILITY 
7151 023206 012700 000341 MOV #347 ,R0 ;LOAD RO WITH TEST NUMBER 
7152 023212 013701 023234 MOV aF#2$,R1 : LOAD R1 WITH TEST INSTRUCTION WORD 
7153 023216 012702 063316 MOV AMBUF 0 ,R2 ;DEST ADDR = MBUFO 
7154 023222 005004 CLR R4 :RESULT S$ / B = 000000 
7155 023224 012712 000001 MOV #1,(R2) ;CDEST] = +1 
7156 023230 000257 CCC CLEAR CODES 
at 023232 000273 273 3N:C = 1011 
ak 023234 005612 23: SBC (R2) TEST THE SBC 
7161 023236 100403 BM] 3$ 3N:C = 0100 ? 
7162 023240 001002 BNE 3$ 
7163 023242 102401 BVS 3$ 
ered 023244 103001 BCC 4$ 
7166 023246 104001 3$: ERROR 1 ; SBC FAILED | TO ALTER THE CODES PROPERLY 
7167 023250 020412 4$: CMP R4,(R2) a OK ? 
Ay, 023252 001402 BEQ TST342 ;;BR IF YES 
7170 023254 011203 MOV (R2) ,R3 :GET THE WAS DATA 
ata 023256 104001 5$: ERROR 1 ;SBC DELIVERED THE WRONG RESULT 
7173 DO III IOIOIIOIIUIUIOIUIOIDIOIOIOIUIOIOIUIOIIOIIOIOIUIDIOIDIIDIOITIOIOIDIDIDIOIOINIDIIMIOINIDIDIOIOI 
7174 i*TEST 342 SBC DM1 TEST = N:C = 0101 
7175 DOI III EI IIOIIUIIOIUIIOIDIOIIIOIIIUIDIIOIUIDIOIOIDIOIUIUIOIOIUIDIOIUIOIIODIIUIOIIOIOI IR tt 
7176 023260 TST342: 
7177 + 023260 000004 SCOPE ;CALL_ THE SCOPE LOOP UTILITY 
7178 023262 012700 000342 MOV #342,R0 7:LOAD RO WITH TEST NUMBER 
7179 + 023266 013701 023312 MOV a42$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
7180 023272 012702 063316 MOV AMBUF 0 ,R2 :DEST ADDR = MBUF 
7181 023276 012704 077777 MOV #077777 ,R& SRESULT S / B = 077777 
7182 023302 012712 100000 MOV #100000, (R2) :CDESTJ = 100000 
7183 023306 000257 ccc CLEAR CODES 
ayo) 023310 000265 265 3N:C = 0101 
ay 023312 005612 2$: SBC (R2) ; TEST THE SBC 
7188 023314 100403 BMI 3$ :N:C = 0010 ? 
7189 023316 001402 BEQ 3$ 
7190 023320 102001 BvC 3$ 
aba 023322 103001 BCC 4$ 
7193 023324 104001 3$: ERROR 1 ;SBC FAILED TO ALTER THE CODES PROPERLY 
7194 023326 020412 4$: CMP R4,(R2) RESULT OK ? 
7195 023330 001402 BEQ TS7343 77BR IF YES 
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1342 SBC DM? TEST = N:C = 0101 


MOV (R2) ,R3 ;GET THE WAS DATA 
S$: ERROR 1 7SBC DELIVERED THE WRONG RESULT 
SFR ARAAAAAARAARERARARARAAAAAREARAARARARARRARERARARRRAARRAAARAREREEH 
s*TEST 343 SBC DM1 TEST = N:C = 1110 
FF RAAARARARRERAAAARAERRERRARERRARARRAARREREAAERRRERRARRRREREARRRAEED 
1S1343: 

SCOPE CALL THE SCOPE LOOP UTILITY 

MOV #343,R0 ;;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV AMBUF O.R2 :DEST ADDR = MBUFO 

MOV #1,R4 sRESULT S ‘ B= 1 

MOV #1. (R2) ;CDESTJ = 

CCC ae CODES 

276 sm:C = 1110 
28: SBC (R2) s TEST THE SBC 

BM! 3$ iN:C = 0000 ? 

BEQ 3$ 

BvSs 3$ 

BCC 4$ 
3$: ERROR 1 ; SBC FAILED | TO ALTER THE CODES PROPERLY 
4$: CMP R4, (Re) :RESUL! Ok 

BEQ TS7344 ;;BR IF ms. 

MOV (R2) ,R3 :GET THE WAS DATA 
5$: ERROR 1 ;SBC DELIVERED THE WRONG RESULT 
SEAR AARARAERKERARARAERARARERRRARARARERAERAAAEARARRAERAARERRAARRARAAD 
S*TEST 344 SBC DM1 TEST - N:C = 0111 
CF RARER EEREEREREEAERRERERARRERAEERERRRARARRERTRAERERARERR 
TS1344: 

SCOPE : CALL THE SCOPE LOOP UTILITY 

MOV #344 ,R0 ZLOAD RO WITH TEST NUMBER 

MOV a 2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 

MOV AMBUFO,R2 “DEST ADDR = MBUFO 

MOV #-1,R4 sRESULT S / B = 177777 

CLR (R2) :CDESTJ = 0000 

CCE :CLEAR CODES 

267 zN:C = 0111 
2$: SBC (R2) ; TEST THE SBC 

BPL 3$ smsC = 1001 ? 

BEQ 3$ 

BVS 3$ 

BCS 4$ 
3$: ERROR 1 SBC tn TO ALTER THE CODES PROPERLY 
4$: CMP R4,(R2) ety 

BEG 157345 7; ;BR IF VES. 


MOV (R2) ,R3 GET THE WAS DATA 


SEQ 0134 


F 117 Soma 
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CQKDAE .P11 17=SEP=79 09:47 7344 SBC DM] “EST = N:C = 01171 SEQ 013 
1638 023466 104001 5$: ERROR 1 ;SBC DELIVERED THE WRONG RESULT 
7254 LLRPO RARER EER ER ERE EEE ERE REEREEE EERE ER EER EEE ERR ARE R ARERR EEE 
7255 peTEST 345 NEGB ~ MODE 0 TEST = N:C = 0110 
7256 LRA AERA EERR EATER EER ER ERE REE REREEEEERRRERERE RARE RARE E RE 
7257 023470 TS1345: 
7258 023470 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
7259 023472 012700 000345 MOV #345,R0 ;7;LOAD RO WITH TEST NUMBER 
7260 023476 013701 0235°6 MOV aF2$,R} ; LOAD rk WITH TEST INSTRUCTION WORD 
7261 023502 012704 177776 MOV 4197996, R4 SRESULT S /_B = 376 (LO BYTE) 
7262 023506 012703 177402 MOV #177602 ,R3 ‘tbe sty = 177602 
7263 023512 000257 CCC =CLEAR FLAGS 
ie 023514 000266 266 iN:C = 0110 
re06 023516 105403 23: NE GB R3 ; TEST THE NEGB 
7268 023520 100003 BPL 3$ su:C = 1001 
7269 023522 001402 BEQ 3$ 
7270 023524 102401 BVS 3$ 
eta) 023526 103401 BCS 4% 
cia 023530 104002 3$: ERROR 2 ;NEGB FAILED TO ALTER CODES PROPERLY 
7275 023532 020403 4$: CMP R4,R3 :CORRECT RESULT ? 
as 023534 001401 BEQ TST 346 3cBR IF VES 
4A | 023536 104002 5$: ERROR 2 ;NEGB DELIVERED THE WRONG RESULT 
7280 PLATE EERE EERE EERE EERE RR EEE Eee 
7281 s*TEST 346 NEGB - MODE O TEST - N:C = 00117 
7282 LAA E REE REE RRR ER ERR EEE EERE ete 
7283 023540 TS7346: 
7284 023540 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
7285 023542 012700 000346 MOV #346,R0 ;;LOAD RO WITH TEST NUMBER 
7286 023546 013701 023566 MOV aF#2$,R1 = LOAD R1 WITH TEST INSTRUCTION WORD 
7287 023552 012704 177400 MOV #177400,R4 ;RESULT S / B = 000 (LO BYTE? 
7288 023556 012703 177400 MOV #177400,R3 ;CDESTJ = 177400 
7289 023562 000257 ccc a ges FLAGS 
iy 023564 000263 263 iN 0011 
roe 023566 105403 es: NE GB R3 : TEST THE NEGB 
7294 023570 100403 BM! 34 iN:C = 0100 
7295 023572 001002 BNE 3$ 
7296 023574 102401 BVS 3$ 
Ce 023576 103001 BCC 4$ 
fad 023600 104002 3$: ERROR 2 ;NEGB FAILED TO ALTER CODES PROPERLY 
7301 023602 020403 4$: CMP R4,R3 ;CORRECT RESULT ? 
ae 023604 001401 BEQ TS7347 77BR IF YES 
fd 023606 104002 5$: ERROR 2 :NEGB DELIVERED THe WRONG RESULT 


7306 PLATA REE RARER AEE EP ET ERR R REAR E REAR EAT R Re Re Eee 


7307 S*TEST 347 NEGB - MODE 0 TEST = N:C = 1101 
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CQKDAE .P11 17=SEP=79 09:47 


1347 NEGB - MODE 0 TEST - N:C = 1101 SEQ 0736 


7308 LLU ERE RET TREAT EERERAEE RAR AEEE EERE RR ERRE RARE HES 
7 023610 1S1367: 
7310 023610 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
7311 023612 012700 000347 MOV #347, ne 310 OAD RO WITH TEST NUMBER 
7312 023616 013701 023636 MOV afc$.R ;LOAD Rl hay TEST INSTRUCTION WORD 
7313 023622 012704 177600 MOV 157600, RS ‘RE SULT S / Bs S- 200 (LO BYTE) 
7314 023626 012703 177600 MOV #177600,R3 : CEST = 17 7600 
7315 023632 000257 CCC FLAGS 
ra1g 023634 000275 275 oh ra 1101 
eds 023636 105403 2$: NEGB R3 sTEST THE NEGB 
7320 023640 100003 BPL 7$ iN:C = 1011 
7321 023642 001402 BEQ 3$ 
7322 4023644 = 102001 BYC 3$ 
rasa 023646 103401 BCS 4$ 
4 023650 104002 3$: ERROR 2 ;NEGB FAILED TO ALTER CODES PROPERLY 
7327 023652 020403 4$: CMP R4,R3 ; CORRECT RESULT ? 
Paso 023654 001401 BEQ TST350 3sQR If VES 
ie} 023656 104002 5$: ERROR 2 ;NEGB DELIVERED THE WRONG RESULT 
7332 SLANE EERE REE EEEREEEREEREERERRR RREREe 
7333 i*TEST 350 CLRB - MODE O TEST - N:C = 1011 
7334 UII IO IUIIUIIIIIOIUIOIOIIIOIIOIIUINIOIUIUIIIIOIUIOIUIDIDIIOIIUIOIUIOINIUIUIOIOIIUIIIO IO ttf 
7335 023660 ™ST350: 
7336 023660 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
7337 023662 012700 000350 MOV #350,R0 : LOAD RO WITH TEST NUMBER 
7338 023666 013701 023706 MOV aF2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
7339 023672 012704 177400 MOV #177400,R4 ZRESULT S / B = 000 (LO BYTE) 
7340 023676 012703 177777 MOV #-1,R3 :CDESTJ = 177777 
7341 023702 000257 CCC : CLEAR FLAGS 
reek 023704 000273 273 iN:C = 1011 
fo! 023706 105003 2s: CLRB R3 ; TEST THE CLRB 
7346 023710 100403 BM! 3% iN:C = 0100 ? 
7347 023712 001002 BNE 3$ 
7348 023714 102401 BVS 3$ 
it a4 023716 103001 BLC 4t 
er ¥ 023720 104002 3$: ERROR 2 3CLRB FAILED TO SET CODES PROPERLY 
7353 023722 020403 4$: CMP R4,R3 ZRESULT CORRECT ? 
023724 T 37BR IF YES 













023726 





5$: 2 7CLRB DELIVERED THE WRONG RESULT 


DERE ERR RRR RRR RRR RRR RRR RAR RRR RRR RRR RR RE RRR RRR RRR RRR RRR RRR RARE ED | 


PRROR 








7359 S*TEST 351 CLRB - MODE 0 TEST - N:C = 0100 

7360 ; LL RAE REAR REE EEE ERATOR EERE EERE R REET REAR REE Ee 
7361 023730 TST351: 

7362 023730 000004 SCOPE 7CALL THE SCOPE LOOP UTILITY 


7363 023732 012700 000351 MOV #3517 ,RO ;,L0AD RO WITH TEST NUMBER 
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MOV mane, R2 [DEST ADDR = MBUFO+1 
MOV #377, RESULT S / B = 377 


MACY 
7351 CLRB = MODE O TEST - N:C = 0100 SEQ 0137 
MOV af2$,R! ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #177400,R4 sRESULT S / B = oe (LO BYTE) 
MOV #-1,R3 :CDESTJ = 17777 
CCC De FLAGS 
SEZ = 0100 
23: CLRB RZ ; TEST THE CLRA 
BM] 3$ yasC = O00 7? 
BNE 3$ 
BvVS 3$ 
acc 4$ 
3$: ERROR 2 ;CLRB FAILED TO SET CODES PROPERLY 
St: CMP R4,R3 SRESULT CORRECT ? 
BEQ TST352 7 ;BR IF YES 
58: ERROR 2 7;CLRB DELIVERED THE WRONG RESULT 
FC RARER ARARAARARERAAAARRAREARAARARAERAREARRKARARAAARARAARAERAERAAE RED 
p*TEST 352 CLRB TEST - DM2 - ODD ADDRESS 
SF ERAAAAAARAAAAAARAAAARAARAARARARARARHRAARARRARAARERARAAEAEERARAERRRERE 
TST352: 
SCOPE : CALL THE SCOPE LOOP UTILITY 
MOV #352,R0 ;LOAD RO WITH TEST. NUMBER 
MOV aF2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
MOV HMFSUF0+1,R2 “DEST ADDR = MBUF0+1 
MOV 4577,R4 sRESULT S / B = 377 
MOV AMBUFO,RS sPOINT RS TO CHECK RESULT 
MOV R2,R3 R3 Se ae DEST ADDR 
MOV #-1,(R5) :CDESTJ = 177777 
CCC > SCOPE m 
cf: CLRB (R3)+ : TEST THE CLRB 
CMP #MBUF 0+2,R3 ;DID DEST REG GET INCREMENTED ? 
BEQ 4$ :BR IF YES 
3$: ERROR 5 ;CLRB FAILED TO UPDATE DEST REG 
4t: CMP R4, (RS) — RESULT ? 
BEQ TST353 ;7BR IF YES 
MOV (R5),R3 ;GET THE WAS DATA 
5$: ERROR 1 7CLRB DELIVFRED WRONG RESULT 
SCRA AARA REE EARARAAARAEAARARKEERARAEAREERAERERAKARAAHERARAERER ARES 
seTEST 353 CLRB TEST - DM1 - ODD ADDRESS 
CG TATA AAARAAAAAERERAARARAARRAERAARAAARERRARARARAAARAAAREREHARERH ORAS 
157353: 
SCOPE 7 CALL THE SCOPE Loo UTILITY 
MOY #353, 3 ;LOAD RO WITH TEST NUMBER 
MOV aF2$,R * LOAD R1 WITH TEST INSTRUCTION WORD 
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CQKDA=E KD11=-K BASIC LOGIC TESTS MACY 
CQKDAE .P11 17-SEP-79 09:47 1353 CLRB TEST = DMI = ODD ADDRESS 
7420 024102 012705 063316 MOV #MBUFO,R5 sPOINT RS TO CHECK RESULT 
7421 024106 010203 MOV R2,R3 [R3 CONTAINS DEST ADDR 
7422 0246110 =012715) 177777 MOV #=-1,(R5) (DEST = 177777 
oy ty 024114 000257 ccc ; SCOPE SYNC 
"a 
yt 024116 105013 2$: CLRS (Az) Cl, ; TEST THE CLRB 
7427 024120 020415 CMP R4,(R5) ; CORRECT RESULT ? 
gs 024122 001402 BEQ TST354 :;BR IF YES 
7430 024124 011503 MOV (R5) ,R3 ;GET THE WAS DATA 
og 024126 104001 3$: ERROR 1 ;CLRB DELIVERED WRONG RESULT 
7433 DOI OIC IOIOISIOIUIOIIIDIOISIOIIOIOIUIDIUINIOIIDIOIOIOIOIOIOIOIDIDIDIOIOIDIDIDIOIOIDIDINIOISIOIDIET 
7434 ;eTEST 354 CLRB TEST - DM2 = EVEN ADDRESS 
7435 DOIG IOIIOIIIDIOIUIIDIOIDIUIDIDIDIDIOIUIOIOIUIOIDIIOIDIUIOIOIOIOIDIUIOIOIIDIDIDIDIDIDIDIDIDIDIDIOIIDIOT tt 
7436 024130 TST354: 
7437 024130 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
7438 024132 012700 000354 MOV #354 ,RO ;Z;LOAD RO WITH TEST NUMBER 
7439 024136 013701 024162 MOV a42$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
7440 024142 012702 063316 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
7441 024146 012704 177400 MOV #177400,R4 ;RESULT S / 8B = 177400 
7442 024152 010203 MOV R2,R3 :R3 CONTAINS DEST ADDR 
7443 024154 012712 177777 MOV #-1,(R2) :CDEST] = 177777 
pr 024160 000257 ccc ;SCOPE SYNC 
gry 024162 105023 2S: CLRB (R3)+ ; TEST THE CLRB 
7448 024164 022703 063317 CMP AMBUF O+1,R3 :DID DEST REG GET INCREMENTED ? 
oe 4 024170 001401 BEQ 4$ ;BR IF YES 
mets 024172 104005 3$: ERROR 5 ;CLRB FAILED TO UPDATE DEST REG 
7453 024174 020412 s: cr R4,(R2) ;CORRECT RESULT ? 
pe: 024176 001402 BEQ TST355 :;BR IF YES 
7456 024200 011203 MOV (R2) ,83 ;GET THE WAS DATA 
eke 024202 104001 5$: ERROR 1 ;CLRB DELIVERED WRONG RESULT 
7459 OOOO IIDIIIDIOIUIOIIOIIIDIUIOIOOIOIUIOIDIUIOIUIDIDIUIDIDIDIDIDIOIIOIUIDIDIDIDIIDIOR IOI IOI ft 
7460 ssTEST 355 CLRB TEST - DM] - EVEN ADDRESS 
7461 CD IOIIOIIIOIIUIIOIIUISIOICIOIDIOIOIOUIOIDIUIDIOIIUIDIUIDIDIIOIUOIIUIDOIOIUIOUINIOO Dion ttt 
7462 024204 751355: 
7463 024204 000004 SCOPE 7 CALL THE SCOPE oy” UTILITY 
7464 024200 012700 000355 MOV #355,R0 ;LOAD RO WITH TEST NUMBER 
7465 024212 013701 024236 : MOV a42$,R1 SLOAD R1 WITH TEST INSTRUCTION WORD 
7466 024216 012702 063316 MOV AMBUF 0 ,R2 4+ $e oe MBUF 0 
7467 024222 012704 177400 MOV #177400,R4 RESULT S / B = 177400 
7468 024226 010203 MOV R2,R3 R3 CONTAINS DEST ADDR 
7469 = 024230 012712 177777 MOV #-1,(R2) :(DESTJ = 177777 
ie 024234 000257 CCC > SCOPE SYNC 
gh 024236 105013 eS: CLRB (R3) ; TEST THE CLRB 
7474 024240 020412 CMP R4,(R2) ZCORRECT RESULT ° 


7475 024242 001402 BEQ TST356 7;BR IF YES 
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024244 
0242466 


024250 


024306 


024310 
024314 


024316 


024320 
024322 


024324 
024326 


tied 


024376 
024400 


024402 
024404 


024406 


105423 


022703 
001401 


104005 


020415 
001402 


011503 
104001 


000004 
012700 
013701 
032737 
001401 


105413 


020415 
001402 


011503 


177777 


063320 


000357 
024400 
000200 


063317 


177777 


063240 
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1355 CLRB TEST = DM1 = EVEN ADDRESS 


MOV (Re) ,R3 GET THE WAS DATA 


3$: ERROR ;CLRB DELIVERED WRONG RESULT 
CF RAAAAAAARARAARRARARAAAAHERAARERARAAKRAARAARRARARAERRRARAARAR ARES 
S*TEST 356 NEGB TEST = DM2 = ODD ADDRESS 
FFT ARAAAAAARAAAARAEARAARAARARARAARRARRARRRARARERERRREHRRRRRRERREEH 
TST356: 
SCOPE = CALL THE SCOPE ‘hg UTILITY 
MOV #356,R0 ;LOAD RO WITH TEST NUMBER 
MOV a42$,R) “LOAD R1 WITH TEST INSTRUCTION WORD 
MOV AMBUF O+1,R2 ;DEST ADDR = MBUFO+1 
MOV #777 RS “RESULT S / B = 777 
MOV #MBUF ORS ;POINT RS TO CHECK RESULT 
MOV R2,R3 7R3 CONTAINS DEST ADDR 
MOV #-i,(R5) :CDESTJ = 177777 
ccc ;SCOPE SYNC 
2$: NE GB (R3)+ ; TEST THE NEGB 
CMP AMBUF O+2,R3 DID DEST REG GET INCREMENTED ? 
BEQ 4$ ;BR IF YES 
3$: ERROR 5 iNEGB FAILED TO UPDATE DEST REG 
4$: CMP R4,(R5) ; CORRECT RESULT ? 
BEQ TST357 ; BR IF YES 
MOV (R5),R3 ;GET THE WAS DATA 
5$: ERROR 1 :NEGB DELIVERED WRONG RESULT 
SLA REE RAKE ERA REAR RRR EERE RR EH 
s*TEST 357 NEGB TEST - DM1 = ODD ADDRESS 


MOAR RESRASALASSAASRSASSASAS SES ERS SRR SSE SSSR REAR ESE RRR ERR RRR SRS RSS SB 
TST357: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
a #357,R0 : ¢LOAD RO WITH TEST NUMBER 
a2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
~SBTITL USER CONTROLLED BREAKPOINT -- BIT7 
BIT #BIT7,aA#BPTLOC a ae HALT SET ?? 


BEQ +4 :BR IF 

HALT BREAK - DEPRESS CONTINUE TO RESTART 
MOV A#MBUF 0+1 ,R2 [DEST ADDR = MBUFO+1 

MOV #777 ,R4 RESULT S$ / B = 777 

MOV AMBUF 0 ,R5 POINT R5 TO CHECK RESULT 

MOV R2,R3 :R3 5 ane 23! ADDR 

MOV #-1,(R5) sCDESTJ = 177777 

CCC ‘SCOPE SYNC 


2$: NE GR (R3) ;TEST THE NEGB 


CMP R4, (R5) CORRECT RESULT ? 
BEQ TST360 :;BR IF YES 


MOV (R5) ,R3 


3GET THE WAS DATA 


SEQ 0139 
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024410 


024412 


0244 
024442 
024444 


024446 
024452 


024454 


024456 
024460 


024462 


024516 
024520 


024522 
024524 


024526 
024530 


24532 


024540 
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105423 


022703 
001401 


1064005 


020412 
001402 


011203 
104001 


105473 


020412 
001402 


011203 
104001 


000004 
012700 
013701 
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177401 
177777 


177401 
177777 


000362 
024562 
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USER CONTROLLED BREAKPOINT -=- BIT7 SEQ 0140 


3$: ERROR 1 ;NEGB DELIVERED WRONG RESULT 


WEARS AAREARRRRRARARSRSRRRRARERRRESE RARER RRR R RR RRR ERE RR RRR RRR E RS SS 


S*TEST 360 NEGB TEST = DM2 = EVEN ADDRESS 


SL UAE ARR ERAERRARAERRAEARAEAERARAEARRARRAAKARAARAAAAARAAHERRA EE 


1$1360: 


;CALL_THE SCOPE LOOP UTILITY 
#360,RO [;LOAD RO WITH TEST NUMBER 
a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
AMBUF 0 ,R2 [DEST ADDR = MBUFO 
#177401,R4 SRESULT S / B = 177401 
R2,R3 :R3 COTA DEST ADDR 
#-1,(R2) :CDEST] = 177777 

: SCOPE SYNC 


(R3)+ 3 TEST THE NEGB 
AMBUF 0+1 ,R3 ;DID DEST REG GET INCREMENTED ? 
4$ ;BR IF YES 


3$: 5 ;NEGB FAILED TO UPDATE DEST REG 


4$: R4,(R2) ; CORRECT RESULT ? 
TST361 :;BR IF YES 


MOV (R2) ,R3 :GET THE WAS DATA 
5$: 1 ;NEGB DELIVERED WRONG RESULT 


STEERER EEK EEE EERE EERE KRENEK EEE 
:*TEST 361 NEGB TEST - DM1 = EVEN ADDRESS 
CRAKEAR AEAEAAREKAEAARRAEKEAERAAERARRARERREKAKAEEREAAAERAEEERAARE ARERR R AED 
TST361: 
;CALL THE SCOPE LOOP UTILITY 
;7LOAD RO WITH TEST NUMBER 
:LOAD R1 WITH TEST INSTRUCTION WORD 
AMBUF 0,R2 ‘DEST ADDR = MBUFO 
#177401,R4 ;RESULT S / B = 177401 
R2,R3 *R3 CONTAINS DEST ADDR 
#-1,(R2) ;CDESTJ] = 177777 
;SCOPE SYNC 


(R3) 3 TEST THE NEGB 


R4, (R2) CORRECT RESULT ? 
TST362 ;7;BR IF YES 


MOV (R2) ,R3 :GET THE WAS DATA 
3$: ERROR 1 :NEGB DELIVERED WRONG RESULT 


SLE REE REE ERE ERE REE RKRERR ERE ERK EH 


S*TEST 362 ADD TEST - SMO,DMO - N:C = 1010 


CLARA A RARER REE REE EEE 


:CALL_THE SCOPE LOOP UTILITY 
. ;:LOAD RO WITH TEST NUMBER 
a4 2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
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024650 
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1362 TEST = SMO,DMO - N:C = 1010 


CLR RS ;RESULT S/ B = 000000 
MOV #=-1,R5 :SRC OPR = 177777 
#+1,R3 :(DEST] = “44 

CCC : CLEAR FLAGS 

272 :C ‘= TOT 
2$: ADD R5,R3 sTEST THE ADD 

BM] 3$ sNsC = O701 

BNE 3$ 

BVS 3$ 

BCS 4$ 
3$: ERROR 2 ;ADD FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 CORRECT RESULT ? 

BEQ TST 363 + BR IF YES 
5$: ERROR 2 ;ADD DELIVERED THE WRONG RESULT 
STUER AREER REAR AERA E ERR REE ERER KEE RERE EE RREREKERRRER EEE EH 
s*TEST 363 ADD TEST - SMO,DMO - N:C = 0101 
SFA AAR ERR REE RERERREEEKEEREREEREEEEREKEEEKREE EERE EREERERERRREE EE 
TST363: 

SCOPE zen THE SCOPE LOOP UTILITY 

MOV #363, am ;LOAD RO WITH TEST NUMBER 

MOV av2$, LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #100006, RG “RESULT S / B = 100006 

MOV #77777, RS sSRC OPR = FA hil 

MOV #7 ,R3 : (DEST = 

CCC > CLEAR Pon @ 

265 iN:C = 0101 
2$: ADD R5,R3 ; TEST THE ADD 

BPL 3$ iN:C = 1010 

BEQ 3$ 

BVC 3$ 

BCC 4$ 
38: ERROR 2 ADD FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 s CORRECT RESULT ? 

BEQ TST364 7;BR IF YES 
5$: ERROR 2 ;ADD DELIVERED THE WRONG RESULT 
DLE EREREREAEERARRERER AREER ERRATA AER E 
S*TEST 364 ADD SM1,DMO TEST 


STARA RAE REAR AERA ERE ARE 


TST364: 


SCOPE :CALL_THE SCOPE LOOP UTILITY 

MOV #364 ,RO [:LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #DWTA,R4 TRESS / B = MDWTA 


MOV MATA,RS :SOURve “DDR = ATA 


SEQ 0141 
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024710 
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024716 
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020403 
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000004 
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001401 
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020437 
001401 


IC TE 
09:47 


063302 


063304 
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2$: 


3$: 
4$: 


5$: 
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ADD SM1,DMO TEST 


CLR 
ccc 


ADD 


CMP 
BEQ 


ERROR 


CMP 
BEQ 


ERROR 


R3 


(R5) ,R3 
R4 ,R3 
4$ 


2 


MATA,RS 
TST365 


5 


55 PAGE 143 

;CDESTJ = 0 

SCOPE SYNC 

TEST THE ADD - SM1,DMO 


;RESULT = #DWTA? 
;BR IF YES 


;ADD DELIVERED WRONG RESULT 
:DID ADD CHANGE REG. 
IF NOT 


sREG GOT MODIFIED 


LL EAR EER REE RRR EERE RAE ERE EKER REE 


s*TEST 365 


ene eee ERE RRR RRR RR RARERARASAS AREA A RARE SA SARA RASA R RRR SARS ASSESS S| 


1S1365: 


2$: 


3$: 
4$: 


5$: 


ERROR 


ADD SM2,DMO TEST 


(R5)+,R3 
R4,R3 
4$ 


2 


MATA+2,R5 
TST 366 


5 


:CALL_THE SCOPE LOOP UTILITY 

:;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
[RESULT S / B = #DWTA 

;SOURCE ADDR = ATA 

:CDEST] = 0 

:SCOPE SYNC 


TEST THE ADD - SM2,DMO 
;RESULT = ADWTA 
;BR IF YES 


sADD DELIVERED WRONG RESULT 
DID ro Ns INCREMENT SOURCE REG? 


;ADD FAILED TO UPDATE SOURCE REG. 


DURE EEE 


s*TEST 366 


SLR EKER EEE EERE EKER KEEEE EERE KH 


1$1366: 


2$: 


ADD SM3,DMO TEST 


HATA+10,R5 
Ree , @AMBUF 0 


a(R5)+,R3 
R4, JAMBUF 0 
4$ 


2 CALL THE SCOPE LOOP UTILITY 
LOAD RO WITH TEST NUMBER 

:LOAD R1 WITH TEST + ahlaacaallateay WORD 

SRESULT S$ / B = #DWT 

ZR5 POINTS TO vo * ADDR 

:CSOURCEJ = ADWT 

:CDESTJ = 

: SCOPE SYNC 


TEST THE ADD - SM3,DMO 
ZRESULT = #DWTA? 
BR IF YES 


SEQ 0142 
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025114 


025116 


025146 
025150 


025152 
025156 


025160 


025162 
025166 
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1366 ADD SM3,DMO TEST 


3$: ERROR 2 ;ADD DELIVERED WRONG RESULT 
4$: CMP MATA+12,R5 ;DID ADD AUTO INCREMENT SOURCE REG? 
BEQ TST367 + BR IF YES 
5$: ERROR 5 ;ADD FAILED TO UPDATE SOURCE REG. 
SEAR RR EREREEERERERRERERREREERERAERERREEREEREEREEREERERER TREE 
s*TEST 367 ADD SM4,DMO TEST 
MARAE ASSASARASZASZASSASSSESE RSE SESE RE SESE SRS RSS RRS RRR RR RRR RSE RSS S SS 
151367: 
COPE ;CALL THE SCOPE LOOP UTILITY 
MOV #367,RO0 + LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
MOV ADWTA,RS *RESULT S / B = #DWTA 
MOV MATA+2,R5 ;SOURCE ADDR = ATA 
CLR R3 ;CDESTJ = 0 
ccc sSCOPE SYNC 
2$: ADD -(R5) ,R3 ;TEST THE ADD - SM4,DMO 
CMP R4,R3 sRESULT = ADWTA? 
BEQ 4$ ;BR IF YES 
3$: ERROR 2 ;ADD DELIVERED WRONG RESULT 
4$: CMP #ATA,RS ;DID SOURCE REG GET DECREMENTED? 
BEQ TST370 77BR IF YES 
5$: ERROR 5 ;ADD FAILED TO UPDATE SOURCE REG 
CF RRR KKK EERE KEEERE REE REE KERR ERK ERE EEE 
:*TEST 370 ADD SM5,DMO TEST 
DFR RRR EERE EKER KEKE KERR EERE ERE REE EK ERR EKER ERE ERE REE 
TST370: 
SCOPE = CALL THE SCOPE LOOP UTILITY 
MOV #370,RO ZLOAD RO WITH TEST NUMBER 
MOV af2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
MOV ADWTA,RS SRESULT S / B = ADWTA 
MOV #ATA+12,R5 :R5 POINTS TO SOURCE ADDR 
MOV R4 , AAMBUF 0 ;CSOURCE] = #DWTA 
CLR R3 :(DESTJ = 0 
CCC sSCOPE SYNC 
2$: ADD a-(R5) ,R3 :TEST THE ADD - SM5,DMO 
CMP R4, aAMBUF 0 RESULT = #DWTA? 
BEQ 4$ :BR IF YES 
3$: ERROR 2 ;ADD DELIVERED WRONG RESULT 
4$: CMP #ATA+10,R5 ;DID ADD DECREMENT SOURCE REG? 
BEG TS7371 :;BR IF YES 


5$: ERROR 5 ;ADD FAILED TO UPDATE SOURCE REG. 


SEQ 0143 


ye SO AREROTTRRN § wad ern oats Pees 
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CQKDAE .P11 17=SEP=79 09:47 1370 ADD SM5,DMO TEST SEQ 0144 
7755 
7756 SLUR AAA ER AA AAE REET REEERER RAR EREERREREREREERRRRERHRRE REHEAT Ee 
7757 s*TEST 371 ADD SM6,DMO TEST 
7758 SLUR RARER EERE RATER ATER ERE REERERRERERREEERRERERRR EERE EERE ES 
7759 =(025172 TST371: 
7760 025172 000004 SCOPE ;CALL_THE SCOPE LOOP UTILITY 
7761 025174 012700 000371 MOV #371 RO :;LOAD RO WITH TEST NUMBER 
7762 025200 013701 025220 MOV a#2$,R1 :LOAD R1 wx TEST INSTRUCTION WORD 
7763 025204 012704 063316 MOV AMBUF 0 RS RESULT S / B = MBUFO 





7764 025210 012705 063302 MOV HATA,RS ZBASE SOURCE ADDR = ATA 

7765 025214 005003 CLR R3 ;CDESTJ = 0 

eG 025216 000257 CCC >SCOPE SYNC 

7768 025220 066503 000010 2$: ADD 10(R5) ,R3 ;TEST THE ADD = SM6,DMO 

7770 025224 020403 CMP R4 ,R3 RESULT =MBUFO? 

Aha 025226 001401 BES TST372 33BR IF YES 

eae 025230 104002 3$: ERROR 2 ;ADD DELIVERED WRONG RESULT 

7775 RRR RARER EERE ERE ERE RRREEREERER EERE 
7776 S*TEST 372 ADD SM7,DMO TEST 

7777 <5 eee He RRR ERE R 
7778 025232 151372: 

7779 =~025232 000004 SCOPE # CALL THE SCOPE LOOP UTILITY 
7780 025234 012700 000372 MOV #372,R0 ;LOAD RO WITH TEST NUMBER 

7781 025240 013701 025264 MOV af#2$,R1 : LOAD R1 WITH TEST “? sphlgenae esas WORD 
7782 025244 012704 063326 MOV ADWTA,RS ;RESULT S / B = ADWTA 

7783 025250 012705 063302 MOV MATA,RS ;BASE SOURCE ADDR = ATA 

7784 025254 010437 063316 MOV R4 , SAMBUF O SCSOURCE] = #DWTA 

7785 025260 005003 CLR R3 :CDESTI = 0 

ke 025262 000257 ccc :SCOPE SYNC 

i 025264 067503 000010 2$: ADD @10(R5> ,R3 ;TEST THE ADD - SM7,DMO 

7790 025270 020403 CMP R4,R3 ;RESULT = ADWTA? 

had) 025272 001401 BEQ TS1373 :;BR IF YES 

tne, 025274 104002 3$: ERROR 2 ;ADD DELIVERED WRONG RESULT 

7795 DIOR IIUIOIIIIOIIIIIOIIIIIUIDIIIDIOIIIOIOIOIDIDIOIIDIDIDIUIUIUIDIDIDIDIDIDIOIIOIOIDITIIDIOEIDIDIDIDIDIOI 
7796 *TEST 373 ADD SM1,DM1 TEST 

7797 DIO IIIIIIIOIOIOIIIUIOIDIORIUIDIOIOIOIIIIUIDIDIOIUIDIIUIUIDIOIUIIDIUIIDIDIIOUIUIUIO OD i tit 
7798 025276 TS1373: 

7799 025276 000004 SCOPE 7 CALL THE SCOPE LOOP UTILITY 
7800 025300 012700 000373 MOV #373,R0 ;LOAD RO WITH TEST NUMBER 

7801 025304 013701 025330 MOV af2$,R1 : LOAD R1 WITH TEST INSTRUCTION WORD 
7802 025310 012702 063316 MOV A#MBUF 0 ,R2 [DEST ADDR = MBUFO 

7803 025314 012704 063326 MOV ADWTA,RS ;RESULT S / B = #DWTA 

7804 025320 012705 063302 MOV MATA,RS :SOURCE ADDR = ATA 

7805 025324 005012 CLR (R2) :CDESTJ] = 0 

oe 025326 000257 CCC SCOPE SYNC 

hata 025330 061512 23: ADD (R5),(R2) ;TEST THE ADD - SM1,DM1 

7810 025332 020412 CMP R4,(R2) SRESULT = #DWTA? 
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001402 
011203 
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MACY 
1373 ADD SM1,DM1 TEST 
BEQ TS1374 ;7BR IF YES 
MOV (R2) ,R3 ;GET WAS DATA 
3$: ERROR 1 ;ADD DELIVERED WRONG RESULT 


SL RAAAAAAARARAAAARARAEARAARARRARERAEARRRRARAARRRARKRAERAERRARERRRREHE 


TeTEST 374 ADD SM2,DM1 TEST 


WEAR RRRRRRAARRARASARARRRASRA RASA RRRRRR RAR RAR REARS RRR RRR RRR RS RSS SS 


151374: 
SCOPE +e THE SCOPE LOOP UTILITY 
MOV #374 ,RO ;LOAD RO WITH TEST NUMBER 
MOV a#2$,Ri LOAD R1 R= MeO INSTRUCTION WORD 


MOV AMBUFO,R2 “DEST ADDR 
MOV #DWTA,RS ;RESULT S / B = #DWTA 
MOV MATA,RS + SOURCE ADDR = ATA 
CLR (R2) ;CDESTJ = 0 
ccc ;SCOPE SYNC 
2$: ADD (R5)+,(R2) ;TEST THE ADD - SM2,DM1 
CMP R4, (R2) sRESULT = #DWTA? 
BEQ 1S1375 :;BR IF YES 
MOV (R2) ,R3 :GET WAS DATA 
3$: ERROR 1 ZADD DELIVERED WRONG RESULT 


FLARE AEA ERARHRRAERARARERARAREAERRERAEREREKREREKRERRAAEREN EEE 


*TEST 375 ADD SM1,DM2 TEST 


SEERA REAR EARR AREER EERE AAEAEAEEAEERAEEEEAREEKEKEH 


1S1375: 


SCOPE ery " ay tg UTILITY 
MOV af42$,R1 ‘i GAD Ri with TEST. INSTRUCTION WORD 
MOV AMBUF 0 ,R2 DEST ADDR = MBUFO 
MOV ADWTA,RS sRESULT S / B = ADWTA 
MOV MATA,RS : SOURCE ADDR = ATA 
MOV R2,R :€R3] = DEST ADDR 
CLR (Re) CDEST] = 0 
CCC ;SCOPE SYNC 
e$: ADD (R5),(R3)+ TEST THE ADD - SM1,DM2 
CMP R4,(R2) ;RESULT = #DWTA? 
BEQ 4$ 7BR IF YES 
MOV R3,a4MBUF 1 7 SAVE gt 5 DEST ADDR 
MOV (R2) ,R3 ;GET WAS DAT 
3$: ERROR 1 ADD DELIVERED WRONG RESULT 
MOV OAMBUF 1, R3 ;RESTORE UPDATED DEST ADDR 
4$: CMP AMBUF 0+2 ,R3 ;DID ADD INCREMENT DEST REG 
BEQ 1S1376 ;:BR IF YES 
5$: ERROR 5 ;ADD FAILED TO UPDATE DEST REG 


FL ARAAAAAAARARARAEARARARARAEARHARAARARAAARAAAAAAAARAAHHAAHRARATEA Res 





SEQ 0145 


any 
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S*TEST 376 


RETREAT AARAREARARAARAEARARRAEARRARARAREAAERARARARERARRARET RARER 


151376: 


23: 


33: 


4t: 


5$: 


ERROR 


D 12 
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ADD SM2,DM2 TE: 


ADD SM2,DM2 TEST 


(R5)+,(R3)+ 
R4,(R2) 

4$ 

R3, Q4MBUF 1 

(Re) ,R3 

: 

aAMBUF 1,R3 


AMBUF 0+2 ,R3 


1S1377 
5 


# CALL THE SCOPE LOOP UTILITY 
;LOAD RO WITH TEST NUMBER 

“LOAD R1 WITH TEST INSTRUCTION WORD 

:DEST ADDR = MBUFO 

;RESULT S / B = #DWTA 

;SOURCE ADDR = ATA 

>(R3] = DEST ADDR 

:EDESTI = 0 

:SCOPE SYNC 


TEST THE ADD - SM2,DM2 


ZRESULT = ADWTA 
;BR IF YES 


; SAVE UPDATED DEST ADDR 
;GET WAS DATA 
;ADD DELIVERED WRONG RESULT 


;RESTORE UPDATED DEST ADDR 
:DID ADD INCREMENT DEST REG? 
;7BR IF YES 


:ADD FAILED TO UPDATE DEST REG 


SPEAR ARARREREHRAAREREERERERRRERAERARERAARARRARRAAAARRRAAAHAAEE 


SeTEST 377 


SRR ERE AEE REAR EERE RERERKRRERREEKEREREKARERREE RD 


1$1377: 


2s: 


3$: 


4$: 


58: 


ERROR 


ADD SM1,DM3 TEST 


(R5) ,a(R3)+ 
R4,(R2) 
4$ 


@4MBUF 1 
MATA+12,R3 
TST400 


5 


CALL THE SCOPE LOOP UTILITY 

;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = FO 


: = ATA 

;CR3] = ADDR OF DEST ADDR 
CDEST] = 0 

;SCOPE SYNC 


TEST THE ADD - SM1,DM3 
ZRESULT = #DWTA? 
;BR IF YES 


SAVE R3 
;GET WAS DATA 
ADD DELIVERED WRONG RESULT 


ZRESTORE R3 
;DID ADD INCREMENT DEST REG 
: IF YES 


ADD FAILED TO UPDATE DEST REG 





SEQ 0146 


eee | 
| 
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025652 


025710 


025712 
025714 


025716 
025722 
025724 


025726 


025740 


025742 


025776 
026000 


026002 
026004 


026006 
026012 
026014 


026016 
026022 
026024 


010337 
011203 
104001 


013703 


020412 
001406 


010337 
011203 
104001 
013703 


020302 
001401 


063322 


063322 
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1377 ADD SM1,DM3 TEST 


DOEARRARAARRARARARRRRRRERARRARRRRR RRR RR RRR RR RRR RRR RRR RRR ER RASS SS S| 


S*TEST 400 ADD SM2,DM3 TEST 
ff AAAAAARARARAAAAARAARARAARAEARRARAARARARARARARARARAARAAARRARARERRARHAE 
+$1400: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #400,RO [LOAD RO WITH TEST NUMBER 
MOV a#2$.R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R “DEST ADDR = MBUFO 
MOV ADWIA RG “RESULT S / B = #DuTA 
MOV HATA,RS “SOURCE ADDR = ATA 
MOV MATA+10, R3 ;(R3] = ADDR OF DEST ADDR 
CLR (R2) S(DEST] = 0 
CCC =SCOPE SYNC 
2$: ADD (R5)+,a(R3)+ = TEST THE ADD - SM2,DM3 
CMP RG, (R2) “RESULT = #DWTA? 
BEG 4$ “BR IF YES 
MOV R3, 04MBUF 1 ; SAVE R3 
MOV (R2) ,R3 [GET WAS DATA 
3$: ERROR 1 [ADD DELIVERED WRONG RESULT 
MOV @AMBUF 1,3 :RESTORE R3 
4$: CMP BATA+12_R3 “DID ADD INCREMENT DEST REG 
BEQ TST401 [:BR IF YES 
S$: ERROR 5 :ADD FAILED TO UPDATE DEST REG 
FE AAAAAARAAARAAAEKERARARAERARERAAKRAERARARRAARAAREARAERARERRRERRARRERH 
s*TEST 401 ADD SM1,DM4 TEST 
Eee eR PPR RRR RRR RRS RRR RR RR RR RAR RRRRRRR RRR RRR R SSR RRR R RRR RRS SRS RES SO 
151401: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #401 ,RO *:LOAD RO WITH TEST NUMBER 
MOV a#2$.R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO.R2 “DEST ADDR = MBUFO 
MOV ADWTA,R4 :RESULT S / B = AfDWTA 
MOV HATA,RS = SOURCE ADDR 
MOV AMBUF 0+2,R3 R3 POINTS TO DEST ADDR +2 
CLR (R2) “(DEST] = 0 
ECC ‘SCOPE SYNC 
2$: ADD (R5) ,=(R3) :TEST THE ADD - SM1,DM4 
CMP R4,(R2) ;RESULT = #DWTA? 
BEO 4$ [QR IF YES 
MOV R3, QMBUF 1 :SAVE R3 
MOV (R2) ,R3 “GET WAS DATA 
3$: ERROR 1 [ADD DELIVERED WRONG RESULT 
MOV @AMBUF 1 ,R3 :RESTORE R3 
4$: CMP R3,R2 “DID ADD INCREMENT DEST REG? 
BEQ 157402 =:BR IF YES 


SEQ 0147 


ea 


en 
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026074 
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026112 


026114 


026116 


026152 
026154 


026156 
026160 


026162 
026166 
026170 
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104005 


061543 
020412 
001406 
010337 
011203 
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007401 
104005 


010337 
011203 
104001 


013703 


063322 


063322 


063322 


063322 
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7401 ADD SM1,DM4 TEST 
5$: ERROR 5 ;ADD FAILED TO UPDATE DEST REG. 
Ff RAAAAARAARAARARRAARAAARKRARAARARARARAAARAARAARARAAAARARARAHAARRARAAAAENE 
:*TEST 402 ADD SM2,DM4 TEST 
£ CARARARAAARAAARARRARARARAARARARRARRERORRAAARARRARRRARARARRRARERED 
TST402: 
SCOPE ;CALL THE vi LOOP UTILITY 
MOV #402,R0 +; LOAD RO WITH TEST NUMBER 
MOV aF2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV AMBUFO,R2 DEST ADDR = MBUFO 
MOV ADWTA,RS sMeMAT $ 7 he — 
MOV #ATA,RS ; SOURCE ADDR 
MOV AMBUFO*2, R3 *R3 POINTS TO” DEST ADDR +2 
CLR (R2) ;CDESTJ = 0 
ccc ; SCOPE SYNC 
es: ADD (R5),-(R3) ;TEST THE ADD - SM2,DM4 
CMP R4,(R2) sRESULT = #DWTA? 
BEQ 4$ ;BR IF YES 
MOV R3, Q4MBUF 1 S SAVE R3 
MOV (R2),R3 GET WAS DATA 
3$: ERROR 1 ;ADD DELIVERED WRONG RESULT 
MOV @AMBUF 1,R3 ;RESTORE R3 
4E: CMP R3,R2 :;DID ADD INCREMENT DEST REG? 
BEQ TS7403 ;;BR IF YES 
5$: ERROR 5 ;ADD FAILED TO UPDATE DEST REG. 
FFARR AAARAERAERREERERHAHREREARRERERERRERAERAARERRERARRARERAH EEN 
>*TEST 403 ADD SM1,DM5 TEST 
SEAR ARERRAERERAEAEREERRAEREEREERRRRAKRRRERREKEARRARERKERE ED 
1S1403: 
SCOPE 7 CALL THE SCOPE LOOP UTILITY 
MOV #403,R0 ZLOAD RO WITH TEST NUMBER 
MOV a¥#2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
MOV AMBUFO,R2 “DEST ADDR = MBUF 
MOV ADWTA,RS sRESULT S / B = #ADWTA 
MOV #ATA,RS ;SOURCE ADDR = ATA 
MOV HATAS12, R3 7R3 CONTAINS ADDR OF DFST ADDR PLUS 2 
CLR (R2) :(DESTJ = 0 
CCC :SCOPE SYNC 
2$: ADD (R5) ,a-(R3) ; TEST THE ADD - SM1,DMS 
CMP RS, (R2) sRESULT = #DWTA? 
BEQ 4$ :BR IF YES 
MOV R3, aAMBUF 1 s SAVE R3 
MOV (R2) ,R3 ;GET WAS DATA 
38: ERROR 1 sADD DELIVERED WRONG RESULT 


MOV QAMBUF TRS SRESTORE R3 





pie ee 


or 


camceiig 
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CQKDAE .P11 17=SEP=79 09:47 7403 ADD SM1,DM5 TEST SEQ 0149 
8035 026176 Oey: 063312 4$: CMP #ATA+10,R3 ;DID ADD DECREMENT DEST REG? 
pit: 026202 001401 BEQ TS1404 ;7BR IF YES 
it 026206 104005 5$: ERROR 5 ;ADD FAILED TO UPDATE DEST REG. 
8040 LARA E EERE EE EERE ERE EEEREEEREEEEEERERREREEEEREREEEE REESE 
8041 s*TEST 404 ADD SM2,DMS TEST 
8042 PLU ELE EEE ETRE ER ARA REE AR ARERR EERE ER RHE R EEE 
8043 026206 TS1404: 
8044 026206 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
8045 026210 012700 000404 MOV #404,R0 ;7,LOAD RO wITH TEST NUMBER 
8046 026214 013701 026244 MOV af 2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
8047 026220 012702 063316 MOV AMBUFO,R2 [DEST ADDR = MBUFO 
8048 026224 012704 063326 MOV #DWTA,RG sRESULT S / B = MDWTA 
8049 026230 012705 063302 MOV MATA,RS ; SOURCE ADDR = ATA 
8050 026234 012703 063314 MOV HATAS12, R3 3R3 CONTAINS ADDR OF DEST ADDR PLUS 2 
8051 026240 005012 CLR (R2) :CDEST] = 0 
ae 026242 000257 CCC > SCOPE SYNC 
ee 026244 062553 2S: ADD (R5)+,a-(R3) ; TEST THE ADD - SM2,DM5 
8056 026246 020412 CMP R4,(R2) SRESULT = #DwTA? 
aes 026250 001406 BEQ 4$ ;BR IF YES 
8059 026252 010337 063322 MOV R3,@4MRUF 1 SAVE R3 
8060 026256 011203 MOV (R2) ,R3 ;GET WAS DATA 
ape 026260 104001 3$: ERROR 1 ZADD DELIVERED WRONG RESULT 
8063 026262 013703 063322 MOV @AMBUF 1 ,R3 RESTORE R3 
8064 026266 022703 063312 4%: CMP MATA+10,R3 DID ADD DECREMENT DEST REG? 
eee 026272 001401 BEQ TST405 , ;BR IF YES 
8067 026274 104005 5$: FRROR 5 ;ADD FAILED TO UPDATE DEST REG 
8069 DO IIGIIOIIIISIOIOIUIOIIIUIOIOIOIUIDIOIUIDIDIDIOIDIOIUIOIDIOIUINIDIDIUIDIDIUIOUIDIIIIDDI Onn itt 
8070 z*TEST 405 ADD SM1,DM6 TEST 
8071 DOO III IOIICIIIIUIIUIUIDIIDIOIUIUIIUIUIDIUIOIUIUIOIOIUIUIDIDIIOIUIC In tt tnt ants 
8072 026276 TST405: 
8073 026276 000004 SCOPE : CALL THE SCOPE LOOP UTILITY 
8074 026300 012700 000405 MOV #405,R0 ;LOAD RO WITH TEST NUMBER 
8075 026304 013701 026334 MOV a#2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
8076 026310 012702 063322 MOV AMBUF 0+4, R2 ;DEST ADDR = MBUFO+4 
8077 026314 012704 063326 MOV ADWTA,R4 :RESULT S / B = MDWTA 
8078 026320 012705 063302 MOV HATA,RS ;SOURCE ADDR = ATA 
8079 026324 012703 063316 MOV #MBLUFO,R3 :(R3] = BASE DEST ADDR 
8080 026330 005012 CLR (R2) :CDEST] = 0 
sted 026332 000257 CCC > SCOPE SYNC 
8083 026334 061563 000004 2$: ADD (R5),4(R3) ;TEST THE ADD - SM1,DM6 
8085 026340 020412 CMP R4,(R2) ZRESULT = #DWTA? 
BOB? 026342 001402 BEQ TST406 7;BR IF YES 
8088 026344 011203 MOV (R2) RZ ;GET WAS DATA 
8089 026346 104001 3$: ERROR 1 ZADD DELIVERED WRONG RESULT 





orn 
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011203 
104001 


011203 
104001 


000070 
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Dee RRRRRRRRSRRRRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RE RE SB! 


RRR AAAAE AREA AARAREAAAEEARHARREERERRAERERRAREREE 


T*TEST 406 ADD SM2,DM6 TEST 
*S$1406: 
SCOPE 
V #406,RO 
MOV ar2$,R1 
MOV #MBUF 0+4 ,R2 
MOV ADWTA,RS 
MOV MATA,RS 
MOV AMBUF 0 ,R3 
CLR (R2) 
CCC 
ct ADD (R5)+,4(R3) 
CMP RS, (R2) 
BEQ TST407 
MOV (R2),R3 
3$: ERROR 1 


CALL THE SCOPE LOOP UTILITY 
3;LOAD RO WITH TEST NUMBER 

:LOAD R1 WITH TEST INSTRUCTION WORD. 
;DEST ADDR = MBUF0+4 


“TR3] = BASE DEST ADDR 
=(DESTJ = 0 
SCOPE SYNC 


TEST THE ADD - SM2,DM6 


RESULT = #DWTA? 
::BR IF YES 


;GET WAS DATA 
;ADD DELIVERED WRONG RESULT 


CCEA AAAAAAERAREEAAEKRARAARARKEARAEAERREARARRRAEERERAAARRHRERARERRHR EH 


s*TEST 407 


ADD SM1,DM7 TEST 


Wee eee eee eee PRR RRR RRR RR RRRRRRARRRRRR RRR SAR RRRRRR ESR RARER RRR RE SS) 


151407: 


MOV AMBUFO,R2 
v ADWTA,RS 
MOV MATA,RS 
MOV R5,R3 
CLR (R2) 
CCC 
c$ ADD (R5),a10(R3) 
CMP R4,(R2) 
BEQ T1410 
MOV (R2) ,R3 
3$: ERROR 1 


;CALL_ THE SCOPE LOOP UTILITY 

;zLOAD RO WITH TEST NUMBER 

:LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 


“BASE DEST ADDR = ATA 
:(DESTJ = 0 

SCOPE SYNC 

ZTEST THE ADD - SM1,DM7 
:RESULT = #DWTA? 

:7BR IF YES 


:GET WAS DATA 
ADD DELIVERED WRONG RESULT 


ERA Ree POPP PPR PPP RRR RRR RRR RRR RRR RRR RRR RRR RRR RRS RRR ERR ER OD 


**TEST 410 


ADD SM2,DM7 TEST 


DEAR RAERER RRR RRR RRR RRR RR RRR RRR RRR RRR RRR RR RRR RR RRR RR RRR RRR SSS SE 


1$1410: 


MOV ADWTA,RS 
MOV MATA RS 
MOV R5,R 
CLR (Re) 


;CALL_THE SCOPE LOOP UTILITY 


7;LOAD RO WITH TEST NUMBER 
;LOAD R17 WITH TEST INSTRUCTION WORD 


DEST ADDR = MBUFO 


“BASE DEST ADDR = ATA 


:CDESTJ = 0 


SEQ 0150 


lam) 
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026564 


000412 
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1410 ADD SM2,DM7 TEST 


ccc ;SCOPE SYNC 
ot: ADD (R5)+,a10(R3) STEST THE ADD = SM2,DM7 
CMP R4,(R2) sRESULT = #DWTA? 
BEQ TST411 ; BR IF YES 
MOV (R2) ,R3 7GET WAS DATA 
58: ERROR 1 ;ADD DELIVERED WRONG RESULT 
SL AAARAAAAAAAAAAAARARARAARARERAAAERAERARAAERRAAAARARRERRAERHERARAREA NAHE 
seTEST 411 "\*“OR RA,RB’' TEST - A=B=000000 N:C=1010 


5 LRT RARRARAARAARAARRERAAARARRERERRKRRARERARRRRRARRARARERRRARARRRERREE 


TS1411: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #411.RO :LOAD RO WITH TEST NUMBER 

MOV ar2$.R1 “LOAD R1 WITH TEST INSTRUCTION WORD 

CLR R4 RESULT AND MASK = 000000 

CLR R3 :CDEST] = 000000 

CCC SCOPE SYNC 

272 [MAKE N:C=1010 
2$: XOR R4,R3 :TEST THE XOR 

BM! 3$ 3N:C=0100 ?? 

BNE 3$ 

BVS 3$ 

BCC 4$ 
3$: ERROR 2 ;XOR FAILED TO SET FLAGS PROPERI ¥ 
4$: CMP R4,R3 ;RESULT CORRECT? 

BEQ TST412 :;BR IF YES 
5$: ERROR 2 ;XOR DELIVERED THE WRONG RESULT 
SUTRA EREREEEEREREEREKEERAEEEKREAEEEEAEAKEEAAERAERARERA AREER EES 
TeTEST 412 "OR RA,RB’' TEST - A=B=177777 N:C=0101 


* 2 APS eee REPRE EERE RRR ERE RRR RRR ARRAS ERR SAR ASSESS RSE RRR RRA RARE RRS SE Os 


1$1412: 


SCOPE . ;CALL THE SCOPE LOOP UTILITY 
MOV #412,R0 : LOAD RO WITH TEST NUMBER 
MOV af2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 : RESULT = pe 
MOV #-1,R5 MASK = 17 
MOV R5,R3 ‘CDESTI= 159999 
CCE ;SCOPE SYNC 
265 SMAKE N:C=0101 
23: XOR R5,R3 : TEST THE XOR 
BM! 3$ =N:C=0101 ?? 
BNE 3$ 
BVS 3$ 
BCS 4$ 


SEQ 0151 
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020403 
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001402 
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100003 
001402 
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125252 
052525 


000414 
026764 
177777 
052525 
125252 


4$: CMP R4,R3 :RESULT CORRECT? 
. BEQ TST414 77BR IF YES 
S$: ERROR 2 :XOR DELIVERED THE WRONG RESULT 
DLE ARARA ARERR REE A AERA RERARARARAAEE AREA KKKREAAKEAKERE EES 
S*TEST 414 *\’“OR RA,RB'’ TEST — A=052525,B=125252 N:C=1001 
DLAI E ERE AERA ERAA EEE SERARKRAERAKEERERERRER ERK 
TSI6146: 
SCOPE CALL TRE SCOPE LOOP UTILITY 
MOV #614,RO *;LOAD RO WITH TEST NUMBER 
MOV anes. RI “LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #-1 *RESULT $/B = 177777 
MOV 95285, R5 *MASK=052525 
MOV #125252,R3 :CDEST] = 125252 
CCC *SCOPE SYNC 
271 ‘MAKE N:C=1001 
2$: XOR R5,R3 TEST THE XOR- . 
BPL 3$ :N:C=1001 ?? 
BEQ 3$ 
BS 3$ | 
BCS 4$ 
3$: ERROR 2 :XOR FAILED TO SET FLAGS PROPERLY 
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“YOR RA,RB'’ TEST = A=B=177777 N:C=0101 SEQ 0152 
3$: ERROR 2. ;MOR FAILED TO SET FLAGS PROPERLY 
S$: CMP R4,R3 ZRESULT CORRECT? 

BEQ TST413 ;;BR IF YES ; 
S$: ERROR 2 :XOR DELIVERED THE WRONG RESULT 
SF RAAAARAARAAARAAAAAEERAERARRARRRARERRARARAARAARERARARAAERARRAAHRH 
Z*TEST 613 "OR RA,RB'' TEST - A=125252,B=052525 N:C=0110 
SLR AAAAARAAEARAAAAAEERARRAREAERRARAARERARRARRRAAARERERAREREREREHA REE 
TS7413: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #413,R0 >:LOAD RO WITH TEST NUMBER 

MOV oer - = LOAD R1 WITH TEST "tebe WORD 

MOV a-1 [RESULT $/B = 177777 

MOV 7128352, RS *=MASK=125252 

MOV #052525.R3 “C(DEST] = 052525 

CCC :SCOPE SYNC 

266 “MAKE N:C=0110 
ef: _XOR R5,R3 TEST THE XOR 

BPL 3$ sNz=C=1000 77 

BEQ 3$ : 

BVS 3$ 

BCC 4$ 
33: ERROR 2 ;XOR FAILED TO SET FLAGS PROPERLY 
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027130 


020403 
001401 


104002 
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1414 ‘MOR RA,RB’’ TEST = A=052525, Bo i95283 N:C=1001 


4$: CMP R4,R3 sRESULT CORRECT? 

BEQ TST415 ;;BR IF YES 
5$: ERROR 2 :XOR DELIVERED THE WRONG RESULT 
DDO SOO IG UIOISIDIUIDIOIIIIDIDIUIOIUIOIDIDIOIUIDIDIDIUIDIUIDIOIDIDIDIOIDIIDIDIDIDIDIDIDIDIDIDIDIDIOE ISIS IDIIDI t 
*TEST 415 "*XOR RA, (RB)'* TEST = A=B=000000 N:C=1010 


FL RARER ARERR RARER AERA ARERERREEREERRREEARARAREREAERAERAERARARREEH EH 


TST415: 


SCOPE 7 CALL THE SCOPE LOOP UTILITY 

MOV #415,R0 ;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 + LOAD Ri WITH TEST INSTRUCTION WORD 

CLR R4 [RESULT S / B = 000000 

CLR R5 sMASK = 00000 

MOV #MBUFO.R2 ;DEST ADDR = MBUFO 

CLR (R2) :CDESTJ = 000000 

CCC : SCOPE SYNC 

272 sMAKE N:C=1010 
2s: XOR R5,(R2) ; TEST THE XOR 

BM! 3$ yu: € = QO100 77 

BNE 3$ 

BvS 3$ 

BCC 4$ 
3$: ERROR 1 ;XOR FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) sRESULT CORRECT? 

BEQ TST416 ss@R if YES 

MOV (R2) ,R3 ;GET THE WAS DATA 
5$: ERROR 1 ;MOR DELIVERED THE WRONG RESULT 
CLR ARARERRORAEERAREAERAAKERERAAAERAERAAERERAREERRERAERAES 
S*TEST 416 **OR RA,(RB)'' TEST = A=B=177777 N:C=0101 


PTAA RARAEERAARE REAR AEAEATAAEARAERRAEAAAAAAARAAAAAERHAAARAAAERARERAH AD 


TST416: 


SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #416,RO >:LOAD RO WITH TEST NUMBER 
MOV a#2$.R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 “RESULT S / B = 000000 
MOV #-1,R5 “MASK = 177777 
MOV AMBUF 0 .R2 [DEST ADDR = MBUFO 
MOV #1, (Re) SCDESTJ] = 177777 
CCC *SCOPE SYNC 
265 “MAKE N:(=0101 
23: XOR R5,(R2) ; TEST THE XOR 
BMI 3$ iN:C = 0101 2? 
BNE z$ 
BVS 3$ 
BCS L$ 
3$: ERROR 1 :MOR FAILED TO ALTER CODES PROPER: Y 


SEQ 0153 


aa 
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000417 
027212 
000400 
177777 


052525 


16 
125252 


063240 
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GE 155 
‘MOR RA,(RB)'' TEST = A=B=177777 N:C=0101 SEQ 0154 
CMP R4, (R2) RESULT CORRECT? 
BEQ TS1417 :;BR IF YES 
MOV (R2) ,R3 GET THE WAS DATA 
ERROR 1 :XOR DELIVERED THE WRONG RESULT 


5 LARA RRA EERE ERE REAR ARRERRAAAERARRARRE EHH 


SeTEST 417 


SERRE AREER REEMA EE 


$$1417: 


"KOR RA, (RB)"' TEST = A=125252,B=052525 N:C=0110 


;CALL_THE SCOPE LOOP UTILITY 
#417,RO >;LOAD RO WITH TEST NUMBER 
;LOAD R1 WITH TEST INSTRUCTION WORD 


a4#2$,R1 
- SBTTL use CONTROLLED BREAKPOINT -- BI 
#B1T8, 


2s: 


3$: 
4$: 


5$: 


patentee eal negate phd elastase b- eat rata 







i*TEST 420 


'MmADRAALAASALASZA£L A222 SAR SRSRSESASSRSRER ESE REALE S ASSESS SEA SARA SSS SS | 


1$1420: 


SCOPE 


T8 
@4BPTLOC cn if tor HALT SET ?? 


I 
;BREAK - DEPRESS CONTINUE TO RESTART 
#-1,R4 sRESULT S/B = 177777 

#125252,R5 ‘MASK = 125252 

#MBUFO,R2 “DEST ADDR = MBUFO 

#052525, (R2) SCDEST] = 052525 


+4 


;SCOPE SYNC 
MAKE N:C=0110 
R5,(R2) : TEST THE XOR 
3$ iN:C = 1000 ?? 
3$ 
3$ 
4$ 






1 :XOR FAILED TO ALTER CODES PROPERLY 







R4, (R2) “RESULT CORRECT? 
TST420 1:BR IF YES 

(R2) ,R3 :GET THE WAS DATA 

1 *XOR DELIVERED THE WRONG RESULT 









"KOR RA, (RB)'' TEST ~ A=052525,B=125252 N:C=1001 







;CALL THE SCOPE LOOP UTILITY 
NUMBER 









#420,R0 +: LOAD RO WITH TEST 
af#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
#-1,R4 SRESULT $/B = 177777 
#52525 .RS MASK = 052525 
#MBUF 0 .R2 ADDR = MBUFO 
#138053 <R2) Pees) = 135985 
‘SCOPE SYNC 






[MAKE N:C=1001 
i: TEST THE XOR 











R5,(R2) 





on 
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CQKDAE .P11 17=SEP=79 09:47 7420 "KOR RA,(RB)"’ TEST = A=052525,B=125252 N:C=1001 SEQ 0155 


8371 027276 100003 BPL 3$ sN:C = 10017 ?? 

8372 027300 001402 BEQ 3$ 

8375 027302 102401 BVS 3$ 

Bee 027304 103401 BCS 4$ 

B78 027306 104001 3$: ERROR 1 :XOR FAILED TO ALTER CODES PROPERLY 
8378 027310 020412 4$: CMP R4, (Re) sRESULT CORRECT? 

Been 027312 001402 BEQ TS1421 :;BR IF YES 

8381 027314 011203 MOV (R2) ,R3 :GET THE WAS DATA 

Stee 027316 104001 5$: ERROR 1 :XOR DELIVERED THE WRONG RESULT 
8384 FDR RIOR OIRO IOICIOIOIO TORIC IOIOIOTOI IOI AOR IOI ASS S AAA ISISIASASAASASI ISAACS: 
8385 s*TEST 421 SUB TEST SMO,DMO - (SRC) = (DEST) = +,+ 

8386 DRO IORI ROR IORI IOI IOI IOS III IAI A IAAI SIA SIASISIISIAISSII SAINI SISA SAIASISISICSASACSACA 
8387 027320 TST421: 

8388 027320 000004 SCOPE :CALL_THE SCOPE LOOP UTILITY 
8389 027322 012700 000421 MOV #421,R0 ;;LOAD RO WITH TEST NUMBER 

8390 027326 013701 027346 MOV a2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
8391 027332 005004 CLR R4 RESULT S$ / B = 0 

8392 027334 012703 052525 MOV #052525 ,R3 :CR3] = DEST OP = 52525 

8393 027340 010305 MOV R3,R5 :CR5] = SRC OP = 52525 

8394 027342 000257 ccc :CLEAR FLAGS 

Beas 027344 000273 273 sMAKE N:C = 1011 

See 027346 160503 2$: SUB R5,R3 TEST THE SUB 

8399 027350 100403 BMI 3$ 

8400 027352 001002 BNE 3$ iDID N:C = 0100 

8401 027354 102401 BVS 3$ 

4153 027356 103001 BCC 4$ 

4.03 027360 104002 3$: ERROR 2 :SUB FAILED TO ALTER CODES PROPERLY 
84 027362 020504 4$: CMP R3,R4 sWAS RESULT = 0? 

er's4 027364 001401 BEQ TST422 ;2BR IF YES 

a4 44 027366 104002 5$: ERROR 2 ;SUB DELIVERED WRONG RESULT 

8411 DORR IRI IORI ICICI ICICI IOI IOI TORO IAA IIIA IISA SAS ASIA ISI SASS: 
8412 :*TEST 422 SUB TEST SMO,DMO - (SRC) = (DEST) = -,- 

8413 CDI IIOIIOIIOIOIOIOIOIUIOIIOIIOIOI OI TOIT IOI OTT TOSI AAAISASAISS ASIA SAAS 
8414 027370 TST422: 

8415 027370 000004 SCOPE :CALL_ THE ni ty LOOP UTILITY 

8416 027372 012700 000422 MOV #422,R0 :;LOAD RO WITH TEST NUMBER 

8417 027376 013701 027416 MOV a2$,R1 :LOAD R1 “ TEST INSTRUCTION WORD 
8418 027402 005004 CLR R4 :RESULT S/B=0 

8419 027404 012703 125252 MOV #125252,R3 :CR3] = DEST OP = 125252 

8420 027410 010305 MOV R3,R5 :CR5]_ = SOURCE OP = 125252 

8421 027412 000257 ccc CLEAR os 

arse 027414 000273 273 :MAKE N 1911 

eese 027416 160503 2$: SUB R5,R3 ;TEST THE SUB 


8426 027420 100403 BM] 3$ 


an 
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027422 
027424 
027426 
027430 


027432 
027434 


027436 


027440 


027470 
027472 


027474 
027476 


027500 
027502 
027504 


027506 
027510 


027512 


027514 


027544 
027546 
027550 


027552 
027554 


17=SEP=79 
001002 
102401 
103001 
104002 


020304 
001401 


104002 


160503 
100403 
001402 
102401 
103401 
104002 


020304 
001401 


104002 


000267 
160503 


100003 
001402 
102401 
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000423 
027472 
000002 
000001 
177777 
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MACY11 30A(1052) 17- SEP-79" 09:55 PAGE 157 ‘al 
T422 SUB TEST SMO,DMO = (SRC) = (DEST) = -,- SEQ 0156 C\ 

BNE 3$ = 0100? 

BVS 3$ 

BCC 4$ 
3$: ERROR 2 ;SUB FAILED TO ALTER CODES PROPERLY 
4$: CMP R3,R4 ;RESULT = 0? 

BEQ TST423 ; BR IF YES 
5$: ERROR 2 ;SUB DELIVERED WRONG RESULT 
je —TRRRAAAAAAAAEAZAAALAAAABAAAEAEEEEEERESRRESESEES ERE SERS ERAS ASR RASS SG 
seTEST 423 SUB TEST SMO,DMO - (SRC) = (DEST) = -,+ 
LARA AAA REAR RR AEA EEE E EERE ERARERERAAARARRRAERRRRRERRE ARES 
TST423: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #423,R0 :7LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #2 ,R4 “RESULT $/B2z2 

MOV #1,R3 :(R3J = DEST OP = 1 

MOV #-1,R5 :CRSJ = SRC OP = -1 

CCC CLEAR FLAGS 

276 :MAKE N:C = 1110 
2$: SUB R5,R3 : TEST THE SUB 

BMI 3$ 

BEQ 3$ zN:C = 0001 

BVS 3$ 

BCS 4$ 
5$: ERROR 2 ;SUB FAILED TO ALTER CODES PROPERLY 
4$: CMP R3,R4 sRESULT = +2? 

BEQ TST424 + BR IF YES 
5$: ERROR 2 ;SUB DELIVERED WRONG RESULT 
LEAR EER REE EEE EEE EERE EERE EERE RE RARE ERS 
S*TEST 424 SUB TEST SMO,DMO (SRC) = -(DEST) = +,- 
LL ERE EEE REE REE EEE REE ERRERREREREEERR ERE RRR 
TST424: 

SCOPE : CALL. THE SCOPE LOOP UTILITY 

MOV #424 ,R0 :LOAD RO WITH TEST NUMBER 

MOV af#2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #-2,R4 =RESULT S / = -2 

MOV #-1,R3 ;CR3] = CDESTJ = -1 

#1,R5 :CR5J] = CSOURCE] = +1 

CCC ; CLEAR FLAGS 

267 sMAKE N:C = 0111 
es: SUB R5,R3 :TEST THE SUB 

BPL 3$ 

BEQ 3$ zN:C€ = 1000 
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027556 
027560 
027562 
027564 


027566 


027570 


027620 
027622 
027624 


027632 
027634 


027636 
027640 


027642 


027676 
027700 
027702 


027710 
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103001 
104002 


020403 
001401 


104002 


160503 


100403 
001402 
102001 
103001 


104002 


020304 
001401 


104002 


160512 


100003 
001402 
102401 
103401 
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SUB TEST SMO,DMO (SRC) = =<(DEST) = ¢,- SEQ 0157 
BCC 4$ 
3$: ERROR 2 ;SUB DID NOT ALTER CODES PROPERLY 
4$: CMP R4,R :RESULT = <2? 
BEQ Re Tes :;BR IF YES 
S$: ERROR 2 ;SUB DELIVERED WRONG RESULT 
SPEAR ATER AEAARERRARRAEREARRRERERERRRAERERAAHRERERERRERHERERE EE 
S*TEST 425 SUB TEST SMO,DMO - 'V'' BIT SETS 
MERA BREBAAAASBARASASLASASLASZLERAR ESSERE SESE S RR RSA REE RASA RS RRR RRA SERS SSS SE 
151425: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #425 ,,RO *:LOAD RO WITH TEST NUMBER 
MOV a2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #77777 RG sRESULT = 77777 
MOV #100000,R3 :C(R3) = DEST OP = 100000 
MOv #1,R5 :(R5] = SRC OP = 
CCC CLEAR FLAGS 
274 ;MAKE N 1100 
2%: SUB R5,R3 :TEST THE SUB 
BM! 3$ 
BEQ 3$ IN:C = 0011 ('V'' BIT SHOULD SET) 
BVC 3$ 
BCC 4$ 
2$: ERROR 2 :SUB FAILED TO ALTER CODES PROPERLY 
4$: cop R3,R4 sRESULT = 77777? 
BEO TST426 :;BR IF YES 
S$: ERROR 2 ;SUB DELIVERED WRONG RESULT 
Ll gaming ge Sigh es eg athe att arnault aa taal Naini lah tie 
“*TEST 426 SUB TEST - SMO,DM1 - N:C = 0110 
'MOeBBRASAASZARSASZASAASAERSSESSSSEESAS SES SEAS SRASERR ASA RASA SR RS SRSR SSS S SE S| 
751426: 
SCOPE ZCALL THE SCOPE LOOP UTILITY 
MOV #426,RO *:LOAD RO WITH TEST NUMBER 
MOV a72$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
MOV AMBUFO,R2 ‘DEST ADDR 
MOV #-1,R4 “RESULT S$ / B = 177777 
MOV #+1_R5 : SRC = ¢ 
CLR (R2) :(DESTJ = 000000 
CCC =CLEAR FLAGS 
266 iN:C = 0110 
2s: SUB R5,(R2) ;TEST THE SUB 
BPL 3$ sN:C = 1001 
BEQ 3$ 
BvS 3$ 


on 
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027712 


027714 
027716 


027720 
027722 


027724 


027756 
027760 
027762 


027770 
027772 


027774 
027776 
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104001 


020412 
001402 


011203 
104001 


020412 
001402 


011203 
104001 


000427 
027760 
063316 


177777 
177777 
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BM! 3$ iN:C = 0010 


1426 SUB TEST = SMO,DM1 - N:C = 0110 SEQ 0158 
3$: FRROR 1 ;SUB FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) CORRECT RESULT ? 
BEQ TS7427 BR IF YES 
MOV (R2) ,R3 ;GET THE WAS DATA 
5$: ERROR 1 ;SUB DELIVERED THE WRONG RESULT 
J FARRAR EARAAAAARARARRRARAEAERARRRRRAERRERRARRRRARRRERRRERRAERARARERES 
s*TEST 427 SUB TEST - SMO,DM1 - N:C = 1010 
JL RAAAAERARARAARARERRARARARRERRRRRERERERERRREEERRRERRERARRERARERERE 
TST427: 
SCOPE 7 CALL THE SCOPE LOOP UTILITY 
MOV #427,R0 ;LOAD RO WITH TEST NUMBER 
MOV af#2$,R1 + LOAD R1 WITH TEST INSTRUCTION WORD 
MOV AMBUFO,R2 :DEST ADDR = MBUFO 
CLR RG *RESULT S/B= _ 
MOV #-1,R5 :SRC OPR = 1777 
MOV #=-1,(R2) :CDEST] = 9997 
CCC :; CLEAR FLAGS 
272 zN:C = 1010 
2s: SUB R5,(R2) : TEST THE SUB 
BM] 3$ iN:C = 0100 
BNE 3$ 
BVS 3$ 
BCC 4$ 
33: ERROR 1 :SUB FAILED TO ALTER CODES PROPERLY 
4$: C RS, (R2) ; CORRECT RESULT ? 
BEQ TS7430 :7BR IF YES 
MOV (R2) ,R3 :GET THE WAS DATA 
S$: ERROR 1 ;SUB DELIVERED THE WRONG RESULT 
WEARER RRBRBRSRARSSAASSASSR SES RSE RSS RRR E RES RRR RRR RR RAR SRR S RRS RS RRR SS SS SO 
Se TEST 430 SUB TEST - SMO,DM1 - N:C = 0000 
MRA RBRASRARAARALRASSRSASESE SR SERRE RES ERE RS RAR AARRSAR SESE RASER SRS SR ES ES 
151430: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #430,R0 ; ;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV AMBUFO,R2 :DEST ADDR = MBUFO 
MOV #77777 RG sRESULT S / B = 77777 
MOV #+1,R5 ;SRC OPR = +1 
MOV #100000, (R2) :CDEST3 = 100000 
CCC : CLEAR FLAGS 
2s: SuB R5,(R2) ;TEST THE SUB 
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030050 
030052 


030054 
030056 


030124 
030126 


030130 
030132 


030134 


030174 


E 
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103001 
104001 


020412 
001402 


011203 
104001 


103401 
104002 


020403 
001401 


104002 


012700 
013701 
005004 
012705 
011503 
000257 
000272 
161503 
100403 
001002 
102401 
103001 


000431 
030114 
177777 
064040 


0004 32 
030164 


063320 
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SUB TEST = SMO,DM1 - N:C = 0000 SEQ 0159 

ACC 4$ 
3$: ERROR 1 ;SUB FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) ; CORRECT RESULT ? 

BEQ TS1431 :;BR IF YES 

MOV (R2) ,R3 ;GET THE WAS DATA 
5$: ERROR 1 :SUR DELIVERED THE WRONG RESULT 
a re eee ae 
ssTEST 431 SUB TEST = SM1,DMO = N:C = 0110 
LAA RARER E EERE HERE R EEE EERE RARER ERR ERRRRR EERE RRR EERE 
TS1431: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #431,R0 ;;LOAD RO WITH TEST NUMBER 

MOV ee “ ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #-1 “RESULT $ / B = 177777 

MOV souiee2. R5 ;SRC ADDR = DWTB+2 

CLR R3 : (DEST) = 000000 

CCC oe ge Ao 

266 = 0110 
ost SUB (R5) ,R3 sTEST THE SUB 

BPL 3$ ZN:C = 1001 

BEQ 3$ 

BVS 3$ 

BCS 4$ 
3$: ERROR 2 SUB FAILED TO ALTER CODES PROPERLY 
4S: CMP R4,R3 ; CORRECT RESULT ? 

BEQ TS7432 :;8R JF YES 
5$: ERROR 2 ;SUB DELIVERED THE WRONG RESULT 
SFA RAKE RARER EEEREERREREREEREREKEEREKKEERERRERERHERRER ER 
s*TEST 432 SUB TEST - SM1,DM0 - N:C = 1010 
CGA ARAERERARARREAAERAAEAKERERERERERRARRAERHREAEREERARRARRERARRHHRERE ND 
TS1432: 

SCOPE a THE SCOPE | OOP UTILITY 

MOV #432 ,R0 :LOAD RO WITH TEST NUMBER 

MOV af 2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 

CLR R4 CRESULT Ss/6 00000 

MOV ADWTA+2,R5 ZSRC ADDR 

MOV (R5),R3 :CDEST] = 

CCC : CLEAR F 

272 NC = 7 
2$: SUB (R5),R3 ;TEST THE SUB 

BM] 3$ 0100 

BNE 3% 

BVS 3$ 
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030176 


030200 
030202 


030204 


030254 


030256 
030260 


030262 


030326 
030330 
030332 
030334 
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104002 


020403 
001401 


104002 


161512 


100003 
001402 
102401 
103401 


LOG 


ou 
ll 
— 


0004 33 
030242 
077777 
063322 
100000 


000001 


0004 34 
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1432 = SUB TEST = SM1,DMO - N:C = 1010 


3$: ERROR 2 ;SUB FAILED TO ALTER CODES PROPERLY 


4$: CMP RG ,R3 ; CORRECT RESULT ? 
BEQ TS1433 ;3BR IF YES 


5$: FRROR 2 ;SUB DELIVERED THE WRONG RESULT 


SERRA ARERRAERERERREARAERAHRERREERHERHEREREEEEED 


SeTEST 633 SUB TEST - SM1,DMO - N:C = 000C 


WER RARARARARARASAARARARRRARARRRRRE RARER RRRR RRR RRR RRR RR RRR ESR S SS | 


1$1433: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #433,RO :LOAD RO WITH TEST NUMBER 
MOV ares ‘LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #77777,RG :RESULT $ / B = 77777 
MOV #MBUF1.R5 =SRC ADDR et 
MOV #100000,R3 :(DEST] = 100000 
MOV #+1,(R5) RC OPR = +1 
CCC =CLEAR FLAGS 
2%: SUB (RS) ,R3 :TEST THE SUB 
BM! 3$ iN:C = 0010 
BEQ 3g 
BVC 3$ 
BCC 4$ 
3$: ERROR 2 :SUB FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 s CORRECT RESULT ? 
BEQ TST434 77BR IF YES 
S$: ERROR 2 :SUB DELIVERED THE WRONG RESULT 


eee eee eee eee eRe REE RRR RRR RRR EERE RRR RRR R SRR RRR RSE S RR SESS 


TeTEST 434 SUB SM1,DM1 TEST - N:C = 0110 


wet eee ee ee RR REE RRRE RRR RRR ERE RARER RRS RRA RRR RRR RRS RRR ASAD SS 


151434: 
SCOPE ;CALL_THE SCOPE LOOP UTILITY 
MOV #434 ,RO LOAD RO WITH TEST NUMBER 
MOV av2$_R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUF 0.R2 [DEST ADDR = MBUFO 
MOV #-1,R RESULT S$ / B = 177777 
MOV #MBUF 1 ,R5 5 ADDR = MBUF 1 
MOV #+1,(R5) :CSOURCE] = 000001 
CLR (R25 :CDESTI = 000000 
CCC iCLEAR FLAGS 
266 = 0110 
2$: SUB (R5), (R2) :TEST THE SUB 
BPL 3$ iN:C = 1001 ? 
BEQ 3$ 
BVS 3$ 


SEQ 0160 


F 13 re 
CQKDA=€ KD11=k BASIC LOGIC TESTS MACY11 30A(1052) 17=SEP=79 09:55 PAGE 162 
COKDAE .P11 1?=SEP=79 09:47 7436 SUB SM1,DM1 TEST = N:C = 0110 SEQ 0161 
8707 
8708 030336 104001 zg: ERROR 1 :SUB FAILED TO ALTER CODES PROPERLY 
8710 030340 020412 4$: CMP R4, (R2) s CORRECT RESULT ? 
ori} 930342 001402 BEO TST435 ::BR IF YES 
8713 030344 011203 MOV (R2) ,R3 :GET THE WAS DATA 
S716 030346 104001 S$: ERROR 1 *SUB DELIVERED THE WRONG RESULT 
8716 ee a eee ee ee 
8717 TeTEST 635 SUB SM1,DM2 TEST - N:C = 0110 
8718 SETAE AAAARAAAAAAEARARHRARARRAARARRERRHARARHRAAARHARARARARAAERRERARE 
8719 030350 151435: 
8720 030350 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
&721 030352 012700 000435 MOV #435,RO :LOAD RO WITH TEST NUMBER 
8722 030356 013701 030412 MOV a2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
8723 030362 012702 063316 MOV AMBUF 0,R2 “DEST ADDR = MBUF 
8724 030366 012704 177777 MOV #-1,RG RESULT S / B = 177777 
8725 030372 012705 063322 MOV AMBUF 1,R5 :SOURCE ADDR = MBUF 
8726 030376 012715 000001 MOV #+7, (R5) :CSOURCE] = 000001 
8727 030402 005012 CLR (R2) :CDESTJ = 000000 
8728 030404 010203 MOV R2,R3 *R3 GETS DEST ADDR 
8729 030406 000257 CCC =CLEAR FLAGS 
8730 030410 000266 266 =N:C = 0110 
8732 030412 161523 2$: SUB (RS), (R3)+ TEST THE SUB : 
8734 030414 100003 BPL 3$ -N:C = 1001 ? 
8735 030416 001402 BEQ 3$ 
8736 030420 102401 BVS 3s 
8737 030422 103401 BCS 4$ 
8739 030424 104005 3$: FRROR 5 :SUB FAILED TO ALTER CODES PROPERLY 
8741 030426 020412 4$: CMP R4, (R2) :CORRECT RESULT ? 
8742 030430 001402 BEQ TS7436 ::BR IF YES 
8744 030432 071202 MOV (R2) ,R3 GET THE WAS DATA 
S745 030434 104001 S$: ERROR 1 *SUB DELIVERED THE WRONG RESULT 
8747 CCAR AER ERA RARER REEKERRAEHEKEREREAEERAREEREARERAREERREEA EE 
8748 S*TEST 436 NEG DM2 TEST 
8749 CD RR RT TTT TTT TTT TTT RRR RRR RE REE RE RE RE R ER tt 
8750 030436 151436: 
8751 030436 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
8752 030440 012700 000436 MOV #436,RO *:LOAD RO WITH TEST NUMBER 
8753 030444 013701 030470 MOV aA2$,R1 =LOAD R1 WITH TEST INSTRUCTION WORD 
8754 030450 012702 063316 MOV AMBUF 0 ,R2 SDEST ADDR = anBut 0 
8755 030454 012704 125252 MOV #125252,R4 ;RESULT sf nye 
8756 030460 010205 MOV R5 :£R5] = 
8757 030462 012712 057526 MOV 53896, (R2) ‘EDEST) © = aorta 
8758 030466 000257 CCC :SCOPE SYNC 
8760 030470 005425 2%: NEG (R5)+ sTEST THE NEG - MODE 2 
8762 030472 020412 CMP RG, (R2) RESULT = 125252? 
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CQKDAE .P11 17=SEP=79 09:47 17436 NEG DM2 TEST SEQ 0162 
they 030474 007402 BEQ 4$ ;BR IF YES 
8765 0304676 011203 MOV (R2) ,R3 ;GET THE WAS DATA 
the) 030500 104001 3$: ERROR 1 iNEG DELIVERED WRONG RESULT 
8768 030502 022705 063320 4$: CMP AMBUFO+2,R5 ;DID REG. GET AUTO INCREMENTED? 
fh a4 030506 001401 BEQ T$7437 77BR IF YES 
a 030510 1046005 5$: ERROR 5 ;NEG FAILED TO UPDATE REG. 
8773 PLR EEE EERE EERE ERE ERE EERE ERE RETR E Ee 
8774 SeTEST 437 NEG DM3 TEST 
8775 LL RRR EEE EERE RRR ERR EER EERE RRA E RR Ree 
8776 030512 1S1437: 
8777 030512 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
8778 030514 012700 000437 MOV #437,R0 ;;LOAD RO WITH TEST NUMBER 
8779 030520 013701 030546 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
8780 030524 012702 063316 MOV #MBUFO,R2 ;DEST owe Ba: 0 
8781 030530 012704 125252 MOV #125252,Ré SRESULT S$ / 125252 
8782 030534 012708 063312 MOV MATA+10,R5 ;CATA+103 = MBUFO 
8783 030540 012712 052526 MOV #52526, (R2) SCDEST] = 52536 
hes 030544 000257 CCC ; SCOPE SYNC 
yh ad 030546 005435 2$: NEG a(R5)+ 3 TEST THE NEG - MODE 3 | 
8788 030550 020412 CMP RG, (R2) SRESULT = 125252? 
8789 030552 001402 BEQ 4$ ;BR if YES | 
8791 030554 011203 MOV (R2),R3 :GET WAS DATA 
{ass 030556 104001 3$: ERROR 1 sNEG DELIVERED WRONG RESULT 
8794 030560 022705 063314 S$. CMP #ATA+12,R5 :DID REG GET AUTO INCREMENTED? 
ae 030564 001401 BEC TST440 337BR IF YES 
aes 030566 104005 5$: ERROR 5 :NEG FAILED TO UPDATE REG. 
8799 DOIG IOIOIIIIIDIOIIIDIUIOIDIDIUIDIOIDIIDIOIUIUIOIOIUIDIOIIIDIUIUIDIOIIDIOIIUIUIOIOII Or ntti 

s*TEST 440 NEG DM4 TEST 
8801 DO OIUIIIIIIOIIIUIDIOIUIDIUIUIDIOIUIIDIDIUIOUOIUIOIUIOIIUIOIDIIUIUIDIOIUIOUIOIIUIIIUIDIIU ID ttt 
8802 9030570 1S17440: 
8803 030570 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
8804 030572 072700 300440 MOV 4440,R0 ;,LOAD RO WITH TEST NUMBER 
8805 030576 013701 030624 MOV a#2$,R1 > LOAD R1 WITH TEST INSTRUCTION WORD 
030602 012702 0633 MOV FO ;DEST ADDR = 

8807 04 125252 MOV #125252, Ré RESULT S / B = 125252 
8808 030612 012705 063320 MOV AMBUF 0+2 ,R5 :CR5] = DEST ADDR + 2 
8809 030616 012712 052526 MOV #52526, (R2) SCDESTI = 52526 
met 0306c2 000257 ccc ;SCOPE SYNC 
8812 030624 005445 28: NEG ~—-=CRSD :TEST THE NEG - MODE 4 
8814 030626 020412 , ‘CMP R4,(R2) sRESULT = 125252? 
asia 030636 001402 Br Q 43% ;BR IF YES 
8817 030632 011203 MOV (R2),R3 ;GET WAS DATA 
8818 030634 104001 3$: ERROR 1 sNEG DFLIVFRED WRONG RESULT 








5 


H 13 
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COKDAE .P11 17=SEP=79 09: 1440 NEG DMG TEST SEQ 0163 
8819 
8820 030636 020502 4$: CMP RS ,R2 ;DID REG GET AUTO INCREMENTED? 
53 0306460 001401 BEQ TS1441 33BR IF YES 


8823 030642 106005 5$: FRROR 5 iNEG FAILED TO UPDATE REG 
| 


On 


CQKDA=E KD11=kK BAS 


CQKDAE P11 


030712 
030716 


030720 


030754 
030756 


030762 
030764 


030766 
030770 


IC 
17-SEP-79 


011203 
104001 
022705 
001401 
164005 


020412 
001402 


011203 
104001 


052526 


063312 


000442 


052526 


000002 


000443 
031026 
063316 


MACY11 30A(1052) 


7440 


I 13 
17=SEP=79 09:55 PAGE 165 
NEG DM4 TEST 


CER RRRRRRRRRRRRRRRRRRRRRR RRR RRR RRR RRR RR RRR RRR RRR RRR RRR RRR RAR SS SS 


DeTEST 441 


SPARE ARAREARAAEEEAE AERA ERAAERARAAEAAARAERAARARREARRKERRKRAKRE AEE 


1ST441: 


5$: 


ERROR 


NEG DMS TEST 


MATA+12,R5 
#52526, (R2) 
a-(RS) 
R4,(R2) 

4$ 

eet AS 


MATA+10,R5 
TST442 


5 


;CALL_THE SCOPE LOOP UTILITY 
;;LOAD RO WITH TEST NUMBER 
;LOAD R1 pig ie s INSTRUCTION WORD 


sSCOPE SYNC 

7 TEST THE NEG - MODE 5 
sRESULT = 125252? 

;BR IF YES 

;GET WAS DATA 

jNEG DELIVERED WRONG RESULT 
;DID NEG UPDATE REG 

37;BR IF YES 


NEG FAILED TO UPDATE REG 


SORA RARER EKER EERE ERE HEE 


S*TEST 442 


ene ee eee Ree ee ee eee PRR RRR ERR RRR RE RRR ER RRR RRR RRR ERR RRR RRR ESS DD 


751442: 


es: 


3$: 


MOV 
ERROR 


NEG DM6 TEST 


AMBUF 0-2 ,R5 
#52526, (R2) 
2(R5) 


R4,(R2) 
TST443 


fo se 


;CALL_ THE SCOPE LOOP UTILITY 

>:LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
[DEST ADDR = MBUFO 


7cR5]) = DD 
:CDEST] = 52526 

s SCOPE SYNC 

: TEST THE NEG - MODE 6 


SRESULT = 125252? 
::BR IF YES 


:GET WAS DATA 
SNEG DELIVERED WRONG RESULT 


Deh eeeeeeRReRRRERRRRRR RR RRR RRR RRR RRR RRRR RRR RRR RRR RR RRR RRR RRR RES SS 


SRTEST 643 


SP RTAAAAAEAAARAERRERAAEAAARERERAEAERAHEARAAHAHARAAARAHARHEHRARARRAAAE EHS 


11443: 


NEG DM7 TEST 


#MBUF 0, R2 


CALL THE SCOPE LOOP UTILITY 
© LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
[DEST ADDR = MBUFO 


SEQ 0164 


4 
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CQKDAE .P11 17=SEP=79 09:47 7443 NEG D 7 TEST SEQ 0165 
8880 031010 012704 125252 mov Ah tag RG ;RESULT S = 125252 
8881 031014 012705 063302 MOV MATA,RS 3CR5J = BASE” ADDR 
8882 031020 012712 052526 MOV #52526, (R2) SCDESTI = 52526 
8883 031024 000257 CCC : SCOPE SYNC 
8885 031026 005475 000010 es: NEG a@10(R5) ; TEST THE NEG - MODE 7 
8887 031932 020412 CMP R4, (R2) sRESULT = 125252? 
oa 031034 001402 BEQ TS1T444 sen if YES 
8890 031036 011203 MOV (R2) ,R3 ;GET WAS DAT 
44h 031040 104001 3$: ERROR 1 “NEG DELIVERED WRONG RESULT 
8893 RRR TERRE REREAD 
8894 TeTEST 444 MOV SM1,DM1 TEST = N:C = 0100 
8895 RRR ERE RRR ERE RRR EERE ERRERERE RRR 
8896 031042 TST444: 


7 
791 031164 MOV a4 2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
8932 031140 005004 CLR R4 RESULT S / B = 177777 


16 MOV #MBUF 0,2 :DEST ADDR = MBUFO 
30 MOV #DWIAtS RS “SOURCE ADDR = DWTA+2 


34 
8935 031150 


8897 031042 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
8898 031044 012700 000444 MOV 444 ,RO ;;LOAD RO WITH TEST NUMBER 
8899 031050 013701 031100 MOV a42$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
8900 931054 005004 CLR R4 sRESULT S / B = 177777 
8901 031056 005104 COM R4 
8902 031060 012702 063316 MOV AMBUF 0 ,R2 DEST ADDR = MBUFO 
8903 031064 012705 063330 MOV HDWTA+2,R5 ; SOURCE “¥ = DWIA+2 
8904 031070 010203 MOV R2,R3 _— DEST ADDR = MBUFO 
8905 031072 005012 CLR (R2) E CDEST] = 000000 
8906 031074 000257 ccc CLEAR FLAGS 
aad 031076 000264 264 =N:C = 0100 
pasi¢4 031100 011513 2s: MOV (R5),(R3) TEST THE MOV - SM1,DM1 
8911 031102 100003 BPL 3$ 3N:C = 1000 ? 
8912 031104 001402 BEG 3$ 
8913 031106 102401 BVS 3$ 
the: 031110 103001 BCC 4$ 
yaa 031112 104001 3$: ERROR 1 sMOV FAILED TO ALTER CODES PROPERLY 
8918 031114 020412 4$: CMP R4, (R2) RESULT CORRECT ?? 
aah 031116 001493 BEQ TST445 33BR IF YES 
8921 031120 005003 CLR R3 GET THE WAS DATA 
8922 031122 051203 BIS (R2) ,R3 
ae? 031124 104001 5$: ERROR 1 sMOV DELIVERED THE WRONG RESULT 
8925 DDO IOI IIDIOIIOIIOIUIOIIOIIOUIUIIUIUIIOOIOIOR On tht tis 
8926 : S*TEST 445 MOV SM2,DM1 TEST = N:C = 0100 
8927 DR EER RRR ERR RRR RRR RE RE E RE ER ER 
8928 031126 TST445: 
8929 031126 000004 SCOPE :CALL_ THE SCOPE LOOP UTILITY 
30 00 000445 MOV #445 ,RO 3:LOAD RO WITH TEST NUMBER 





CQKDA-E KD11-K 
COKDAE .P11 


8936 031154 


8946 031174 
8948 031176 


8949 
8950 031200 
8951 031202 


8955 031210 


031212 


8971 031246 
8973 031250 
8975 031252 


8980 031262 


8982 031264 
8983 031266 


8985 031270 
8986 031272 
8987 031274 


BASIC LOG 
17=SEP=79 


010203 
005012 
000257 
000264 
012513 


IC TESTS 


TE 
09:47 


000446 
031256 


063316 
063326 


<r) 30A(1052) 


MOV SM2,DM1 TEST = N:C 


2$: MOV 


3$: ERROR 


4$: CMP 
BEG 


CLR 


BIS 
5$: ERROR 


S*TEST 446 


weet eee ee RRR ER REESE SERRA RARARSESAR SAAR ERASERS ASEAS ARRAS ER SASS SD SS 


TS1446: 


2s: MOV 


3$: ERROR 


S$: CMP 
BEQ 


CLR 
BiS 
58: ERROR 


SeTEST 667 


PLASMA AAAARAAAAAAEAAREAAAAAAAERAAARAEREAAAARAAARARARAAREERAARAARAARAAAAARA He 


13 
17=seP=79° rs 55 PAGE 167 
= 0100 


R2,R3 
(R2) 


(R5)+,(R3) 


R4, (R2) 
TST446 


R3 
(R2) ,R$ 


pte DEST ADDR = 


CLEAR F 
IN: = 0100" 


Reg fe 000000 


MBUF 0 


TEST THE MOV = SM2,DM1 


iN:C = 1000 ? 


7MOV FAILED TO ALTER CODES PROPERLY 


RESULT CORRECT ?? 
IF YES 


3GET THE WAS DATA 


;MOV DELIVERED THE WRONG RESULT 


SRE EERE REE ERR REREAD 


MOV SM1,DM1 TEST - N:C = 1011 


R4,(R2) 
TST447 


R3 
wet aS 


= CALL THE SCOPE LOOP UTILITY 
NUMBER 


;LOAD RO WITH TEST 


:LOAD R1 WITH TEST INSTRUCTION WORD ° 
:RESULT S / B = 000000 


;DEST ADDR = MBUFO 


; SOURCE og & kg & 
: MAKE CesT = 177777 


sCLEAR FLAGS 
iN:C = 1011 


FO 


TEST THE MOV - SM1,DM1 


sm2€ = O101 7 


:MOV FAILED TO ALTER CODES PROPERLY 


;RESULT CORRECT ?? 
;;BR IF YES 


;GET THE WAS DATA 


;MOV DELIVERED THE WRONG RESULT 


SPEAR AAAAAA RA EAAARARAAAEARAAERAHARNRAAEAARAAAATKARERRAE KR THARO RAE 


MOV SM2,DM1 TEST = N:C = 1011 


SEQ 0166 


CQKDA-E KD11-k BAS! 


CQKDAE .P11 


031276 


031350 
031352 


031354 


031356 
031360 


031416 
031420 
031422 


031430 
031432 


031434 
031440 


90 
i 


17=$EP= 


103401 
104001 
020412 
001403 
005003 
051203 
104001 


011523 


100003 
001402 
102401 
103001 


104001 


022703 
001401 


000447 
031334 


063316 
063326 


000450 
031420 


063316 
063330 


063320 


+ ont Si 30A(1052) 
447 MOV SM2,DM1 TEST = N:C 


TST447: 


2$: MOV 


3$: ERROR 


4$: CMP 


BIS 
5$: ERROR 


SRR REE REE AEKERRE EE ERE KAKA ERE E EK 


MOV SM1,DM2 TEST = N:C = 


Wee eee eee RRR RR EERE REESE ERASERS SSRARRS ERAS AAAS SARA RR RRR SALAS ASSES SS 


S*TEST 450 
1$1450: 


2$: MOV 


3$: ERROR 


L 13 
17=SEP=79" g: si _— 168 


R4, (Re) 
TST450 


R3 
ie 


#450 ,RO 
a#2$,R1 

R4 

R4 
A#MBUF 0 ,R2 
ADWTA+2,R5 
R2,R3 

(R2) 


(R5),(R3)+ 


1 
AMBUF0+2,R3 
6$ 


+ THE SCOPE LOOP UTILITY 


OAD RO WITH TEST 


NUMBER 
LOAD R1 WITH TEST INSTRUCTION WORD 
S / B = 000000 


“RESULT S 


[DEST ADDR = MBUFO 


; SOURCE ADDR = 


DWTA 


[BASE DEST ADDR = MBUF 


MAKE CDESTJ = 


: CLEAR FLAGS 
sNsC = 1017 


3 TEST THE MOV - SM2,DM1 


sMOV FAILED TO ALTER CODES PROPERLY 


= 0101 ? 


177777 


;RESULT CORRECT ?? 
;;BR IF YES 


3GET THE WAS DATA 


;MOV DELIVERED THE WRONG RESULT 


: CALL THE SCOPE LCOP UTILITY 
NUMBER 


0100 


;LOAD RO WITH TEST 


“LOAD R1 WITH TEST ele WORD 
:RESULT S / B = 177777 


;DEST ADDR = ge +H 


SOURCE ADDR = 


0 


BASE DEST ADDR. - oT MBUF 0 


iMAKE wie J = 
ae gol AGS 
* 0100 


000000 


TEST THE MOV - SM1,DM2 


3N:C = 1000 ? 


:MOV FAILED TO ALTER CODES PROPERLY 
:DID MOV INCREMENT DEST REG ? 
BR IF YES 


. 
’ 


SEQ 0167 


M 13 
CQKDA-E KD11-K BASIC LOGIC TESTS MACY11 aa 17-SEP-79" 55 PAGE 169 
CQKDAE .P11 17=SEP=79 09:47 - 1450 MOV SM1,DM2 TEST = N:C = 0100 SEQ 0168 


031442 104005 5$: :MOV FAILED TO UPDATE DEST REG 


031444 020412 6$: R4,(R2) RESULT CORRECT ?? 
031446 001403 TST451 :;BR IF YES 


031450 005003 R3 GET THE WAS DATA 
031452 051203 (R2) ,R3 
031454 104001 7$: 1 ;MOV DELIVERED THE WRONG RESULT 


Wee eee ERE REERRERSERALERRSASESAR RARER RASA LERE SERRE SSSR SRR RSLS ES ES SD 


S*TEST 451 MOV SM2,DM2 TEST = N:C = 0100 


SOROS IIIOIIOIUIUISIUIDIOISIOIOISISIDIIIUIOIUIOIOIOIOISISSIDIOIOISIDIOIUIUIOIIOISINISDIIIUIIOI IO tt 
031456 1S1451: 
;CALL_ THE SCOPE LOOP UTILITY 


000451 MOV #451,R9 ;;LOAD RO WITH TEST NUMBER 
031514 aeons ;LOAD R1 WITH TEST INSTRUCTION WORD 


RESULT S / B = 177777 


RS 
063316 AMBUF 0 ,R2 ;DEST ADDR = MBUFO 
063330 ADWTA+2,R5 ;SOURCE ADDR = DWTA 
2R3 SBASE DEST ADDR = MBUFO 
(R2) ;MAKE CDESTJ = 000000 
2 Ts FLAGS 
031512 :C = 0100 


031514 : (R5)+,(R3)+ TEST THE MOV - SM2,DM2 


031516 100003 3N:C = 1000 ? 
031520 
031522 
031524 


031526 : :MOV FAILED TO ALTER CODES PROPERLY 


031530 022703 é b AMBUF 0+2 ,R3 :DID MOV INCREMENT DEST REG ? 
031534 001401 6$ ;BR IF YES 


031536 104005 : 5 sMOV FAILED TO UPDATE DEST REG 


031540 020412 : R4, (R2) RESULT CORRECT ?? 
031542 001403 TST452 3:BR IF YES 


031544 005003 R3 GET THE WAS DATA 
031546 051203 I (R2) ,R3 
031550 10400 7$: 1 :MOV DELIVERED THE WRONG RESULT 


Pe ee 


S*eTEST 452 MOV SM1,DM3 TEST - N:C = 0100 


SEERA KERR AREER ERE ERK 


031552 151452: 
E 7CALL_THE SCOPE hag UTILITY 
000452 >:LOAD RO WITH TEST NUMBER 
031612 1 ;LOAD R1 WITH bg 7 INSTRUCTION WORD 
4 TRESULT S / B = 177777 





CQKDA=E KD11-K BASIC L 


CQKDAE .P11 


OOODDOOO0OVOO 
ad ad ad at and od oad ed ed 


9119 


031570 


03 

031610 
031612 
031614 


031622 
031624 


031626 
031632 


031710 
031712 


031720 
031722 


031724 
031730 


17-SEP- 


000264 
011533 
100003 
001402 
192401 
103001 
104001 


022703 
001401 


104005 
020412 
001403 
005003 
051203 
104001 


012533 


100005 
001402 
102401 
103001 


104001 


022703 
001401 


063314 


000453 
031710 


063314 


MACY11 30A(1052) 
1452 


7$: 


N 13 
17=SEP=79" © 55 PAGE 170 
MOV SM1,DM3 TEST = N:C = 0100 


#MBUF 0 .R2 
#DWTA+2,R5 
MATA+10,R3 
(R2) 


(R5) ,a(R3)+ 


1 
MATA+12,RZ 
6$ 

5 

R4, (R2) 
TST453 


R3 
ene? 


:DEST ADDR = MBUFO 
; SOUR 


MAKE CDESTJ = 000000 
J FLAGS 

= 0100 
;TEST THE MOV = SM1,DM3 


= 1000 ? 


sMOV FAILED TO ALTER CODES PROPERLY 
;DID MOV_INCREMENT DEST REG ? 
IF YES 


MOV FAILED TO UPDATE DEST REG 
RESULT CORRECT ?? 
;3BR IF YES 


;GET THE WAS DATA 
zMOV DELIVERED THE WRONG RESULT 


ee ee ee 


Z*TEST 452 


1S1453: 


2$: 


3$: 
4$= 


MOV SM2,DM3 TEST - N:C = 0100 


RRR KERR EREEEEKEEKEEKREKEREKE EERE 


#453,R0 
a4#2$,R1 

RS 

RS 
AMBUFO,R2 
A#DWTA+2,R5 
#ATA+10,R3 
(R2) 


(R5)+,a(R3)+ 


1 
aha 


;CALL_ THE SCOPE LOOP UTILITY 
;;LOAD RO WITH TEST NUMBER 
;LOAD R1 WITH TEST INSTRUCTION WORD 
RESULT S / B = 177777 
DEST ADDR = MBUFO 
>SOURCE ADDR = DWIA+2 
BASE DEST ADDR = ATA+10 
MAKE CDESTJ = 000000 
— FLAGS 
= 0100 
TEST THE MOV - SM2,DM3 


iN:C = 1000 ? 


sMOV FAILED TO ALTER CODES PROPERLY 
;DID MOV INCREMENT DEST REG ? 
BR IF YES 


SEQ 0169 


om 


CQKDA-E KD11=-K BASIC LOGIC TESTS 
CQKDAE .P11 ? 


031732 


031734 
031736 


031740 


031742 
031744 


031746 


032006 


032016 
O3<..: 


032022 
032024 


032026 


032030 
032032 


17=SEP=79 09:4 
104005 
020412 
001403 


005003 
051203 
104001 


011543 


100003 
001402 
102401 
103001 


104001 


020203 
001401 


104005 


020412 
001403 


005003 
051203 
104001 


000004 
012700 000455 
013701 032102 
005004 
005104 
012702 063316 


B 14 
MACY11 RES 17=SEP=79° 09:55 PAGE 171 
1453 Vv SM2, 


DM3 TEST = N:C = 0100 SEQ 0170 

S$: ERROR 5 :MOV FAILED TO UPDATE DEST REG 
6$: CMP R4, (R2) :RESULT CORRECT ?? 

BEQ TS7454 :;BR if YES 

CLR R3 :GET THE WAS DATA 

BIS (R2) ,R3 
7$: ERROR 1 :MOV DELIVERED THE WRONG RESULT 
LL a maa te gag es ange ye Tt aati ote ti ga 
T*TEST 454 MOV SM1,DM4 TEST = N:C = 0100 
WEE ARBRRBAASRAEBZASLALEAASZLESEESSESERESE RASS SSA RARASSE SRR RRR R RRR RRR SSS S| 
151456: 

SCOPE ZCALL THE SCOPE LOOP UTILITY 

MOV #454 ,RO *:;LOAD RO WITH TEST NUMBER 

MOV av2$.R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 

CLR R4 “RESULT S$ / B = 177777 

COM R4 

MOV AMBUF 0 ,R2 :DEST ADDR = MBUFO 

MOV MDWTA+2,R5 SSOURCE ADDR = DWTA+2 

MOV AMBUF 0+2,R3 BASE DEST ADDR MBUF 0+2 

CLR (R2) — CDEST] = 000000 

CCC CLEAR FLAGS 

264 = 0700 
23: MOV (R5) ,=(R3) : TEST THE MOV - SM1,DM4 

BPL 3$ :N:C = 1000 ? 

BEQ 3$ 

BVS 3$ 

BCC 4$ 
3$: ERROR 1 :MOV FAILED TO ALTER CODES PROPERLY 
4$: CMP R2,R3 :DID MOV DECREMENT DEST REG ? 

BEQ 6$ [BR IF YES 
S$: ERROR 5 :MOV FAILED TO UPDATE DEST REG 
63: CMP R4, (R2) :RESULT CORRECT ?? 

BEQ TST455 -:BR IF YES 

CLR R3 :GET THE WAS DATA 

BIS (R2) .R3 
7$: ERROR 1 :MOV DELIVERED THE WRONG RESULT 
DURE REE ERE ERK 
T*TEST 455 MOV SM2,DM4 TEST - N:C = 0100 
SLA EREREEREER EERE KEKE ERE 
151455: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #455,RO -:LOAD RO WITH TEST NUMBER 

MOV a#2$.R1 ‘LOAD R1 WITH TEST _ANSTRUCT ION WORD 

CLR R4 “RESULT S / B = 177777 


R4 
MOV #MBUFO,R2 DEST ADDR = MBUFO 


aon 


C 14 
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CQKDAE .P11 17=SEP=79 09:47 1455 v SM2,DM4 TEST = N:C = 0100 SEQ 0171 
9216 032064 012705 063330 MOV #DWTA+2,R5 ; SOURCE ADDR. = DwIA+2 
9217 032070 012703 063320 MOV WMBUFO+2 RS BASE DEST ADDR = MBUFO+2 
9218 032074 005012 CLR (R2) :MAKE cDEST) = 000000 
9219 032076 000257 CCC iCLEAR FLAGS 
9220 032100 000264 264 =N:€ = 0100 
9228 032102 012543 2$: MOV (R5)+,=(R3) :TEST THE MOV = SM2,DMG 
9224 032104 100003 BPL 3$ :N:C = 1000 ? 
9225 032106 001402 BEQ 3$ 
9226 032110 102401 BVS %$ 
9207 032112 7103001 BCC 4$ 
9209 032114 104001 33: ERROR 1 :MOV FAILED TO ALTER CODES PROPERLY 
9231 032116 020203 4$: CMP R2,R3 :DID MOV INCREMENT DEST REG ? 
9032 032120 001401 BEO 6$ “BR IF YES 
9034 032122 104005 5¢: ERROR 5 :MOV FAILED TO UPDATE DEST REG 
9236 032124 020412 63: CMP RG, (R2) ;RESULT CORRECT ?? 
9037 032126 001403 BEQ TS1456 ‘:BR IF YES 
9239 032130 005003 CLR R3 :GET THE WAS DATA 
9240 032132 051203 BIS (R2) .R3 
9241 032134 104001 7$: ERROR 1 :MOV DELIVERED THE WRONG RESULT 
9243 EPR RERBRAAAASAAASASASRERESESRERSSSR SERA RARESRAAASASAERSE RASS ESSER SESE SE SS 
9244 SSTEST 456 MOV SM1,DM5 TEST - N:C = 0100 
9245 WPPoRAARAARBRSRASRRASAASSRSASASRARR ESSERE SRARASARRASRARASRARSARARASR SARA S SSR SRS SS | 





9246 032136 151456: 

9247 032136 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

9248 032140 012700 000456 MOV #456, He *:LOAD RO WITH TEST NUMBER 

9249 032144 013701 032210 MOV af#2$,R zLOAD R1 WITH TEST INSTRUCTION WORD 
9250 -SBITL USER coment ie. BREAKPOINT -- BIT9 

9251 032150 032737 001000 063240 BIT 0 bea @4BPTLOC ;BREAKPOINT HALT SET ?? 

9252 032156 001401 BEQ *BR IF NOT 

9253 032160 000000 HALT ;BREAK - DEPRESS CONTINUE TO RESTART 
9254 032162 005004 CLR R4 ;RESULT S / B = 177777 

9255 032164 005104 COM RG 

9256 032166 012702 063316 MOV #MBUF OR 2 ;DEST ADDR = MBUFO 

9257 032172 012705 063330 MOV #DWTA+2,R5 ;SOURCE ADDR = DWTA+2 

9258 032176 012703 063314 MOV MATA+12,R3 sBASE DEST ADDR = ATA+12 
9259 032202 005012 CLR (R2) sMAKE [DEST] = 000000 

9260 032204 000257 ccc : CLEAR FLAGS 

as 032206 000264 264 iN:C = 0100 

ao? 032210 011553 2s: MOV (R5) ,a-(R4) ZTEST THE MOV - SM1,DM5 

9265 032212 100003 BPL 3$ IN:C = 0100 ? 

9266 032214 001402 BEQ 3$ 

9267 932216 102401 BYS 3$ 

ae 032220 103001 BCC 4$ 

9270 032222 104001 3$: ERROR 1 sMOV FAILED TO ALTER CODES PROPER, ¥ 


teenage Pit KD11-K BASIC LOGIC i MACY11 30A(1052) 17-SEP-79 09: 3 PAGE 173 





OKDAE .P 17=SEP=79 09:4 USER CONTROLLED BREAKPOINT <= BIT9 SEQ 0172 
9272 032224 022703 063312 4$: CMP MATA+10,R3 :DID MOV DECREMENT DEST REG ? 
1 032230 001401 BEQ 6$ ;BR IF YES 
9275 032232 104005 S$: ERROR 5 :MOV FAILED TO UPDATE DEST REG 
9277 032234 020412 6$: CMP R4,(R2) sRESULT CORRECT ?? 
ose 032236 001403 BEQ TST457 :;BR IF YES 
9280 032240 005003 CLR R3 ;GET THE WAS DATA 
9281 032242 051203 BIS (R2) ,R3 
54 032244 104001 7$: ERROR 1 sMOV DELIVERED THE WRONG RESULT 
9284 DO III III IISIIIIUIIIOIIIOIUIOIIIISIUIIOIUIIUIUINIOIDISIIIOIUIUIIUIIOIIOIOIIOD IIR ttt 
9285 i*TEST 457 MOV SM2,DM5 TEST = N:C = 0100 
9286 DITOR IUIISIIISISISIOIOIIOIIIUIOIIIIDIDIOIOIUIISIUIUIIIOIIDIUIIDIDIOIUIOIUIOIUIOIIIUI I OI tt 
9287 032246 TS1457: 
9288 032246 4 SCOPE 2 CALL THE SCOPE LOOP UTILITY 
9289 032250 012700 000457 MOV #457 ,RO OAD RO WITH TEST NUMBER 
9290 032254 013701 032306 MOV a#2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
9291 032260 5 CLR R4 RESULT S / B = 177777 
9292 032262 5104 COM R4 
9293 032264 9012702 063316 MOV #MBUFO,R2 DEST ADDR = MBUFO 
9294 032270 012705 063330 MOV ADWTA+2 RS SOURCE ADDR = DWTAt2 
9295 032274 012703 063314 MOV MATA+12,R3 ;BASE DEST ADDR = ATA+i2 
9296 032 005012 CLR (R2) :MAKE CDESTJ = 00000 
9297 032302 000257 ccc CLEAR FLAGS 
9 4 2304 000264 264 iN:C = 1000 
po ain 032306 012553 e$: MOV (R5)+,a@-(R3) TEST THE MOV - SM2,DM5 
9302 032310 100003 BPL 3$ 3N:C = 1000 ? 
9503 032312 001402 BEQ 3$ 
9304 032314 102401 BVS 3$ 
aane 032316 103001 BCC 4$ 
pe wt 032320 104001 3$: ERROR 1 ;MOV FAILED TO ALTER CODES PROPERLY 
9309 032322 022703 063312 4$: CMP MATA+79,R3 ;DID MOV DECREMENT DEST REG ? 
4 ah 032326 001401 BEQ 6$ BR IF YES 
oatg 032330 104005 5$: ERROR 5 sMOV FAILED TO UPDATE DEST REG 
9314 032332 020412 6$: CMP R4,(R2) RESULT CORRECT ?? 
Uy 032354 001403 BEQ TST460 ;;BR IF YES 
9317 032336 005003 CLR R3 GET THE WAS DATA 
9318 032340 051203 B1S (R2) ,R3 
tah 4 032342 104001 7$: ERROR 1 7MOV DELIVERED THE WRONG RESUL 
9321 DUIUOIOIISIUIIIOIIIIOIOIIDIOIIUIDIIUOIOIIUIDUIOIUIUIIUUIOIIUIUIIUUD IDOE Eis tres 
9322 ;*TEST 460 MOV SM1,DM6 TEST - N:C = 0100 
9323 LL REE REE RARER ATER ERR ARERR REE Ee 
9324 032344 TST460° 
9325 032344 000004 SCOP CALL THE SCOPE LOOP UTILITY 
9326 032346 012700 000460 MOV #460 ,RO 7;LOAD RO WITH TEST NUMBER 
9327 032352 013761 032404 MOV a4 2$,R1 ;LOAD R1 WITH TEST INSTRUCTIUN WORD 
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1460 MOV SM1,DM6 TEST = N:C = 0100 SEQ 0173 

CLR RS sRESULT S / B = 177777 

COM RG 

MOV #MBUTN+6 RO ;DEST ADDR = MBUF0+6 

MOV #DWTA+2,R5 ;SOURCE ADDR = DWTA+2 

MOV AMBUFO,R3 “BASE DEST ADDR = MBUFO 

CLR (R2) ;MAKE CDESTJ = 000000 

CCC ;CLEAR FLAGS 

264 =N:C = 0100 
2$ MOV (R5) ,6(R3) ; TEST THE MOV - SM1,DM6 

BPL 3$ sN:C = 1000 ? 

BEQ 3$ 

BVS 3$ 

BCC 4$ 
3$ ERROR 1 MOV FAILED TO ALTER CODES PROPERLY 
4% CMP RS, (R2) sRESULT CORRECT ?7 

BEQ TST461 7;BR IF YES 

CLR R3 ;GET THE WAS DATA 

BIS (R2) ,R3 
S$: ERROR 1 :MOV DELIVERED THE WRONG RESULT 
Re ee ee 
s*TEST 461 MOV SM2,DM6 TEST - N:C = 0100 
CLARA RARAERARAERRORERERAHERRERRERERRERERRRAARRKEAERRAAERRAKERHHHE 
TST461: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #461,RO ;7;LOAD RO WITH TEST NUMBER 

MOV aF2$,R1 + LOAD R1 WITH TEST INSTRUCTION WORD 

CLR RS :RESULT S / B = 177777 


R4 
MOV #MBUF 0+6,R2 
MOV #DWTA+2,R5 
MOV #MBUFO,R3 


:DEST ADDR = MBUFO+6 
; SOURCE ADDR = DWTA+2 
BASE DEST ADDR = MBUFO 


CLR (R2) MAKE CDESTJ] = 000000 
CCC as ge FLAGS 
264 = 0100 


2$: MOV (R5)+,6(R3) TEST THE MOV - SM2,DM6 


BPL 3$ iN:C = 1000 ? 
BEQ 3$ 
BVS 3$ 
BCC 4$ 


sMOV FAILED TO ALTER CODES PROPERLY 


R4,(R2) RESULT CORRECT ?? 
BEQ TST462 77BR IF YES 


CLR R3 :GET THE WAS DATA 
BIS (R2) ,R3 
1 MOV DELIVERED THE WRONG RESULT 
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CQKDA-E + hie BASIC LOGIC TE 
CQKDAE .P1 17=SEP=79 09:47 1461 MOV SM2,DM6 TEST = N:C = 0100 SEQ 0174 
9385 FF AARAAARAERAARARARAARARAAAAERARAARRARERRRARRARARRERRARARAARAHERAEHE 
9386 s*TEST 462 MOV SM1,DM7 TEST = N:C = 0100 
9387 J FR AAAARAARRARAAAARAAAARAAAARAAARARRAARARRARARRORARARRAHRAARARARHERR 
9388 032524 TS1462: 
9389 032524 000004 SCOPE 7 CALL THE SCOPE LOOP UTILITY 
9390 032526 012700 000462 MOV #462 ,RO sLOAD RO WITH TEST NUMBER 
9391 032532 013701 032564 MOV af2$,R1 “LOAD R1 WITH de 7 oyyp TION WORD 
9392 032536 005004 CLR RG sRESULT S / B = 17 
9393 032540 005104 COM RS 
9394 032542 012702 063316 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
9395 032546 012705 063330 MOV #DWTA+2,R5 ;SOURCE ADDR = DWTA+2 
9396 032552 012703 063302 MOV MATA,R3S “BASE DEST ADDR = ATA 
9397 032556 005012 CLR (R2) :MAKE [DEST] = 000000 
9398 032560 000257 ccc : CLEAR FLAGS 
pe 032562 000264 264 “N:C = 0100 
py dh 032564 011573 000010 23: MOV (R5) ,a10(R3) ;TEST THE MOV - SM1,DM7 
9403 032570 100003 BPL 3$ zN:C = 1000 ? 
9404 032572 001402 BEQ 3$ 
9405 032574 102401 BVS 3$ 
bers 032576 103001 BCC 4$ 
b' 032600 104001 3$: ERROR 3 sMOV FAILED TO ALTER CODES PROPERLY 
94190 032602 020412 4$: CMP R4,(R2) sRESULT CORRECS ?? 
mis 032604 001403 BEQ 181463 ;7BR IF YES 
9413 032606 005003 CLR R3 ;GET THE WAS DATA 
9414 032610 051203 BIS (R2) ,R3 
nie 032612 104001 5$: ERROR 1 sMOV DELIVERED THE WRONG RESULT 
9417 WPS RRR SRE RR SSE SRR ERR RR ERR RR RR SR ERR RR RE RRR RRR SER RSE ERR S SE SS 
9418 T*eTEST 663 MOV SM2,DM7 TEST - N:C = 0100 
9419 . LRA AARERAARERAEARARRERERARREKERAEERERAAHERKERERERAERRAREEREA EE 
9420 032614 151463: 
9421 032614 000004 SCOPE 2 CALL THE SCOPE LOOP UTILITY 
9422 032616 012700 000463 MOV #463,R0 LOAD RO WITH TEST NUMBER 
9423 032622 013701 032654 MOV a#2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
9424 032626 005004 CLR RS SRESULT S / B = 177777 
9425 032630 005104 COM R4 
9426 032632 012702 063316 MOV #MPUFO,R2 :DEST ADDR = MBUFO 
9427 032636 012705 063330 MOV M#DWTA+2,R5 ;SOURCE ADDR = DWTA+2 
9428 032642 012703 063302 MOV MATA,R3 “BASE DEST ADDR = ATA 
9429 032646 005012 CLR (R2) sMAKE CDEST] = 000000 
9430 032650 000257 CCC = CLEAR FLAGS 
atl 032652 000264 264 in:C = 0100 
pad 032654 011573 000010 2%: MOY (R5) ,a@10(R3) sTEST THE MOV - SM2,DM7 
9435 032660 100003 BPL 3$ iN:C = 1000 ? 
9436 032662 001402 BEQ 3$ 
9437 032664 102401 BVS 3$ 
9438 032666 103001 BCC 4% 
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CQKDAE .P 17=SEP=79 09:47 1463 MOV SM2,DM7 TEST = N:C = 0100 SEQ 0175 


9440 032670 104001 3$: ERROR 1 sMOV FAILED TO ALTER CODES PROPER. “ee 


9441 
9442 032672 020412 4$: CMP R4,(R2) RESULT CORRECT ?? 

9463 032674 001403 BE Q TST464 ::BR IF YES 

9445 032676 005003 CLR R3 ;GET THE WAS DATA 

9446 032700 051208 BIS (R2) RB 

94? 032702 104001 S$: ERROR 1 :MOV DELIVERED THE WRONG RESULT 
9449 J J RAARARARARARARERARAARAAARARARARRARRRARAAARARARARAAHREARARAARRARRARAA EE 
9450 T*TEST 464 MOV SMO,DM1 TEST 

9451 CF CAAA AAAAARARARARARAAAAARERAAAARARARAAERAARAAAAAAAAARARRARAAAAEAAARERNE 
9452 032704 151466: 

9453 032704 000004 SCOPE ZCALL THE SCOPE LOOP UTILITY 

9454 032706 012700 000464 MOV #464 RO >:LOAD RO WITH TEST NUMBER 

9455 032712 013701 032732 MOV a72$,R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
9456 032716 012702 063316 MOV AMBUF 0,R2 =DEST ADDR = MBUF 

9457 032722 010004 MOV RO,R4 [RESULT S / B = TEST NUMBER 

9458 032724 010205 MOV R2_R5 :R5 GETS DEST ADDR 

9459 032726 005012 CLR (R2) : (DEST) = 000000 

9460 032730 000257 CCC = SCOPE SYNC 

9462 032732 010015 28: MOV RO, (RS) : TEST THE MOV 

9464 032734 020412 CMP RG, (R2) :RESULT CORRECT ? 

2665 032736 001402 BEQ TS1465 +;BR IF YES 

9467 032760 011203 MOV (R2) ,R3 :GET THE WAS DATA 

9468 032742 166001 2$: ERROR 1 “MOV DELIVERED THE WRONG RESULT 
9470 ERRATA EAARAREARERAARARAARAERARERARAHRATEREH RHEE 
9471 SeTEST 465 MOV SMO,DM2 TEST 

9472 Poe Ree RRR RRR RRR SRR RRR RRR RRR RRR RRR RR RR RRRR SRR RRR RRR RRR RS RSE SS D1 
9473 032744 151465: 

9474 032744 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 

9475 032746 012700 000465 MOV #465,RO =LOAD RO WITH TEST NUMBER 

9476 032752 013701 032772 MOV a2$,R} “LOAD R1 WITH TEST INSTRUCTION WORD 
9477 032756 012702 063316 MOV #MBUF 0,R2 ‘DEST ADDR = MBUr0 

9478 032762 010004 MOV RO,R4 sRESULT S / B = TEST NUMBER 

9479 032764 010205 MOV R2,R5 ‘RS GETS DEST ADDR 

9480 032766 005012 CLR (R2) :{DEST] = 0000 

rar 032770 000257 CCC =SCOPE SYNC 

9483 032772 010025 2%: MOV RO, (R5)+ :TEST THE MOV 

9485 032774 020412 CMP R4, (R2) :RESULT CORRECT ? 

94.86 032776 001402 BEQ TS7466 :;BR IF YES 

9488 033000 011203 MOV (R2) ,R3 :GET THE WAS DATA 








104001 3$: ERROR 1 :MOV DELIVERED THE WRONG RESULT 












SLUR AAARERARRAR ATER EAERRAEAEERARAERRARRAAERARRERRARRRAEKE RARER 


9492 **TEST 466 MOV SMO,DM3 TEST 







9493 REE EERE REE EERE EERE EERE EERE TERE TERRE ER 
9494 033004 151466: 
9495 033004 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 





orn 
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1466 MOV SMO,DM3 T 


MOV #466,R0 ;ZLOAD RO WITH TEST NUMBER 

MOV af2$,R) ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 :DEST ADDR = MBUFO 

MOV RO,RS aaah s S / B = TEST NUMBER 

MOV WATA+10,R5 DEST ADDR = ATA+10 

CLR (Re) PoeSTy = 000000 

CCC ; SCOPE SYNC 
23: MOV RO,a(R5)+ : TEST THE MOV 

C R4,(R2) ; CORRECT RESULT 

BEQ TS1467 ;7BR IF YES 

- MOV (R2) ,R3 :GET THE WAS DATA 

3$: ERROR 1 sMOV DELIVERED THE WRONG RESULT 
SETH AAAAAA AA RAAAARRARERARARAREARAREAAERARARERARRAERRRAHERARRERRENRHKE EE 
S*TEST 467 MOV SMO,DM4 TEST 
SF FARA ARA AAA RAEEARARARHOERERERARAKERAARERERRRRERARARARRKEERRREERERES 
TS1467: 

SCOPE F # CALL THE SCOPE LOOP UTILITY 

MOV #467 ,RO LOAD RO WITH TEST NUMBER 

MOV @42$,R’ “{ OAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 :DEST ADDR = MBUFO 

MOV RO,R4 RESULT S / B = TEST NUMBER 

MOV WMBUFO+2,R5 “RS CONTAINS BASE DEST ADDR 

CLR (R2) :C(DESTJ = 000000 

CCC > SCOPE SYNC 
C$: MOV RO,-(R5) ; TEST THE MOV 

CMP R4,(R2) : CORRECT RESULT ? 

BEQ TST470 ;;BR IF YES 

MOV (R2) ,R3 ;GET THE WAS DATA 
3$: ERROR 1 MOV DELIVERED THE WRONG RESULT 
STARA AAAAARAAEEERAAERAEAREREARAEAAAEAAAAEERAA TERRA EHER AERA AREER EAE 
s*TEST 470 MOV SMO,DMS TEST 
fF RARER AAAAAEERAEARAEERRAREKEKEKAERERERERAAREAAERKREARAREKA HHH RED 
1S1470: 

SCOPE 2 CALL THE SCOPF LOOP UTILITY 

MOV #470,R0 LOAD RO WITH TEST NUMBER 

MOV af2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 “DEST ADDR = MBUFO 

MOV RO,R4 SRE SULT S / B = TEST NUMBER 

MOV MATA+12,R5 ;R5 CONTAINS BASE DEST ADDR 

CLR (R2) (EST), = 000000 

cee :SCOPE SYNC 
2$: MOV RO,a-(R5) STEST THE MOV 

CMP R4,(R2) ; CORRECT RESULT ? 

BEQ TST471 :;BR IF YES . 

MOV (R2) ,R3 ;GET THE WAS DATA 


SEQ 0176 | 
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T4670 MOV SMO,DMS TEST SEQ 0177 
3s: ERROR 1 ;MOV DELIVERED THE WRONG RESULT 
SL EAARAAAARARAAAKAAAAAAARRARAEARRERAARARAARARARARRRRRARRAAAREAARE HD 
SSTEST 471 MOV SMO,DM6 TEST 
6S RRARAAARARERRARAAAAARARARARAERRARARRARERRRARARRARARARRAARARRERARAHE 
TS1471: 

SCOPE :CALL_ THE SCOPE LOOP UTILITY 

MOV -#471,RO LOAD RO WITH TEST NUMBER 

MOV  — aw28.RT (OAD R1 WITH TEST INSTRUCTION WORD 

MOV —- #MBUF 1,R2 DEST ADDR = MBUF 

MOV —RO, RG “RESULT S / B = TEST NUMBER 

MOV  #MBUF ORS “BASE DEST ADDR = MBUFO 

CLR (R2) {DEST = 000000 

CCC = SCOPE SYNC 
2$: MOV —RO, 4 (RS) TEST THE MOV . 

(MP RG, (R2) RESULT CORRECT ? 

BEQ  —«tTSf472 ::BR IF YES 

MOV —s- (R2) , RB GET THE WAS DATA 
3$: ERROR 1 “MOV DELIVERED THE WRONG RESULT 
SL EAAAAAAA RARER AARAARAEK AERA RERRAERAEAEREAREERAERERRRERAERERRAARAH EE 
LATEST 472 MOVB TEST - SMO,DMO - EXTEND 1'S 
CL RARER ER RAAEARARARAARAARKKRAAAEARRRERARARERAAARRER ERR 
TST472: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV «#4720 ;LOAD RO WITH TEST NUMBER 

MOV = aw#2$.-R1 :{OAD R1 WITH TEST INSTRUCTION WORD 

MOV —s-#177652,R4 “RESULT S$ / B= 177652 

MOV «#252. R5 SOURCE OP = 252 

CLAS ZEDEST] = 000000 

ade = CLEAR FLAGS 

266 ZN:C = 0110 
2$:  MOVB RS, RB TEST THE MOVB 

BPL 3$ N:C = 1000 ? 

BEQ Ss 3S 

BVS s3S 

Bcc OCS 
33: ERROR 2 ;MOVB FAILED TO ALTER CODES PROPERLY 

. 4S: CMP RG, RB RESULT CORRECT ? 

BEQ «S473 ::BR IF YES 
5$: ERROR 2 :MOVB DELIVERED THE WRONG RESULT 
CIEE AARAAAAERARAAAARHERARARAEEAREREARHAAARAERAEAEAAAERAHEHHeRAeEhe 
SSTEST 473 MOVB TEST - SMO,DMO - EXTEND O'S 
CG TAK AAAAARAEAERAAAAAARAAAAEAAAAEHARAAAEKRARAEHARAAAHHKAAAHHAAAeAAeAe 
181473: 

SCOPE ZCALL THE SCOPE LOOP UTILITY 


se 
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COKDAE.P11 17=SEP=79 09:4 473 MOVB TEST = SMO,DMO - EXTEND O'S SEQ 0178 
033272 012700 000473 MOV #473,RO ::LOAD RO WITH TEST NUMBER 
9609 033276 83 $953 033320 MOV a#2$.R1 LOAD R1 WITH TEST INSTRUCTION WORD 
9610 033302 005004 CLR RG :RESULT 5 / B = 000000 
9611 033304 012705 177400 MOV #177600,R5 “SOURCE OP = 177400 | 
9612 033310 005003 CLR R3 *CDEST) = 177777 
9613 033312 005103 cOM R3 | 
9614 033314 000257 CCC SCLEAR FLAGS 
9615 033316 000271 271 “N:C = 1001 
9617 033320 110503 2$: MOVB —R5,R3 :TEST THE MOVB 
9619 033322 100403 BMI 3$ ZN:C = 0101 ? 
9620 033324 001002 BNE zg 
9621 033326 102401 BVS 33 
9622 033330 103401 BCS 4$ 
9624 933332 104002 3g: ERROR 2 :MOVB FAILED TO ALTER CODES PROPERLY 
9626 033334 020403 4$: CMP RG RB RESULT CORRECT ? 
9627 033336 001401 BEQ TS1476 ‘:BR IF YES 
9629 033340 104002 5$: ERROR 2 :MOVB DELIVERED THE WRONG RESULT 
9631 PTTITITITITITTTITITTTTTETLE TELE ET LE LTE E LETTE 
9632 TRIEST 674 MOVB TEST - SMi,DMO - SOURCE ADDR EVEN 
9633 FAROE RRA RER ERE ERR EES 
9634 033342 1S1474: 
9635 033342 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
9636 033344 012700 000474 MOV #476 ,RO LOAD RO WITH TEST R 
9637 033350 013701 033370 MOV a#2$_R1 LOAD R1 WITH TEST INSTRUCTION WORD 
9638 033354 005004 CLR RG “RESULT S / B = 000000 
9639 033356 012705 064634 MOV #DBTA,RS ‘SOURCE ADDR = DBTA 
9640 033362 005003 CLR R3 S(DEST] = 177777 
9641 033364 005103 COM R3 
3642 033366 000257 CCC :SCOPE SYNC 
9644 033370 111503 2$: MOVB _—(R5).R3 :TEST THE MOVB 
9646 033372 020403 . CMP R4.R3 :RESULT CORRECT ? 
9647 033374 001401 BEQ TST475 ‘:BR IF YES 
9649 033376 104002 3$: ERROR 2 :MOVB DELIVERED THE WRONG RESULT 
9651 CL RRR 
9652 TRTEST 675 MOVB TEST - SM1,DMO - SOURCE ADDR ODD 
9653 CAAA RARER AREER EE KKK KERR EERE EERE 
9654 033400 1$1475: 
9655 033400 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
9656 033402 012700 000475 MOV #475 ,RO [LOAD RO WITH TEST NUMBER 
9657 033406 013701 033430 MOV a#2$_R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
9658 033412 012704 000125 MOV #125RG SRESULT S / B = 125 
9659 033416 012705 064637 MOV HDBTA+3,R5 ‘SOURCE ADDR = DBTA+3 
9660 033422 012703 177400 MOV #177400_R3 *CDESTJ] = 177400 
3661 033426 000257 CCC “SCOPE SYNC 


9663 033430 111503 2$: MOVB (R5) ,R3 TEST THE MOVB 
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CQKDA-E kD11=-k BASIC LOGIC TE 

CQKDAE .P11 17=SEP=79 09:47 1475 TEST = SM1,DMO = SOURCE ADDR ODD SEQ 0179 
9664 
9665 033432 020403 CMP R4,R3 RESULT CORRECT ? 
oes 033434 001401 BEQ TST476 + BR IF YES 
a7 033436 104002 3$: ERROR 2 ;MOVB DELIVERED THE WRONG RESULT 
9670 JDO ISIOIUIUIIISISISIOIUIUISIOIIUIDIOISIOIUIDIUIDIDIOIOIUIDIOIDIDIDIDIDIDIOIDIDIDIIOISI UIE 
9671 *TEST 476 MOVS TEST = SM2,DMO = SOURCE ADDR ODD 
9672 DUO AU IU IIIS IOIIIUIUIDIOIIUIDIUIOIIIDIUIOIDIOIUIDIOIIDIOIDIUIIDIOIUIDIDIDIDIDIDIDIDIOIDISIDISIDIDIDE 
9673 033440 TST476: 
9674 033440 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
9675 033442 012700 000476 MOV #476,R0 ;;LOAD RO WITH TEST NUMBER 
9676 033446 013701 033466 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
9677 033452 012704 177777 MOV #-1,R4 sRESULT S / B = 177777 
9678 033456 012705 064635 MOV #DBTA+1, RS ;SOURCE ADDR = DBTA+1 
9679 033462 005003 CLR R3 ;CDEST] = 000000 
one 033464 000257 ccc ;SCOPE SYNC 
ar 1 033466 112503 2$: MOVB (R5)+,R3 7 TEST THE MOVB 
9684 033470 020403 CMP R4,R3 sRESULT CORRECT ? 
9685 033472 001401 BEQ 4$ ;BR IF YES 
9687 033474 104002 3$: ERROR 2 :MOVB DELIVERED THE WRONG RESULT 
9689 033476 022705 064636 4$: CMP ~— R5 ;DID MOVB INCREMENT SRC REG ? 
ote 033502 001401 BEQ TST477 7:BR IF YES 
a 033504 104005 5$: ERROR 5 :MOVB FAILED TO UPDATE SRC REG 
9694 TDDB IOIUIDIIOIOIIDIDIDIIIOIDIIOIOIOIOIOIUIDIDIDIOIDIDIDIDIDIDIOIOIOISI IOI SI ITI OI IIOI I 
9695 i*TEST 477 MOVB TEST - SM2,DMO - SOURCE ADDR EVEN 
9696 DDS OIUIOIIIIOIIIIIDIOIIUIIIIIOIUIOIUIDIDIDIOIOIUIDIDISIIOIUIDIDIDIDIDIDIOIDIDIOIUIOISIOI IDIOT TIRE 
9697 033506 TST477: 
9698 033506 000004 SCOPE : CALL THE SCOPE LOOP UTILITY 
9699 033510 012700 000477 MOV #477 ,RO ;LOAD RO WITH TEST NUMBER 
9700 033514 013701 033534 MOV af#2$,R1 “LOAD R1 “x TEST INSTRUCTION WORD 
9701 033520 005004 CLR R4 re dy S$ / B = 000000 
9702 033522 012705 064634 MOV #DBTA,R5 SOURCE ADDR = DBTA 
9703 033526 012703 177400 MOV #177400,R3 :CDESTI = 177400 
sa 033532 000257 ccc SCOPE SYNC 
oe 033534 112503 2$: MOVB (R5)+,R3 :TEST THE MOVB 
9708 033536 020403 CMP R4,R3 RESULT CORRECT ? 
i 033540 001401 BEQ 4$ ;BR IF YES 
apt 033542 104002 3$: ERROR 2 7MOVB DELIVERED THE WRONG RESULT 
9713 033544 022705 064635 4$: CMP #DBTA+1,R5 ;DID MOVB INCREMENT SRC REG ? 
oe 033550 001401 BEQ TSTSO0 :;BR IF YES 
as I 033552 104005 5$: ERROR 5 :MOVB FAILED TO UPDATE SOURCE REG 
9718 RARER ERR EERE ERE 


9719 S*TEST 500 MOVB TEST - SM1,DM1 = SRC ADR ODD / DST ADR EVEN 


QKDAE .P 


033720 


P se 
sy 
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111512 


020412 
001402 


011203 
104001 


111523 


020412 
001402 


011203 
104001 


022703 
001401 


104005 


063317 
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T500 TEST = SM1,DM1 = SRC ADR ODD / DST ADR EVEN 


SRTAARARARARARAAARAAARAARAARKARARAHRRRRAAAARAARARRRAERHRERARRER ERY 


7S1500: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #500,R0 +; LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 DEST ADDR = FO 
MOV #377 RS ;RESULT S / B = 377 
MOV #DBTA+1, R5 ;SRC ADDR = DBTA +1 
CLR (R2) ;CDESTJ = 000000 
CCC > CLEAR FLAGS - SCOPE SYNC 
es: MOVB (R5),(R2) ; TEST THE MOVB 
CMP R4, (R2) ; CORRECT RESULT ? 
BEQ TST501 +: BR IF YES 
MOV (R2) ,R3 ;GET THE WAS DATA 
3$: ERROR 1 ;MOVB DELIVERED WRONG RESULT 
SD IIE RRR EKER EERE REE REE RE RERERER EERE REEEREEREKKEE KEE 
Z*TEST 501 MOVB TEST - SM1,DM2 - SRC ADR ODD / DST ADR EVEN 
DDR EEE ERR ERE ERE ERE RRR KKEREEEREEREEEREEREKEE 
TST$01; 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #501,R0 >: LOA OAD RO WITH TEST NUMBER 
MOV a2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUF 0 ,R2 ;DEST Bw Ray FO 
MOV #377 .R4 SRESULT $ / 377 
MOV #DBTA+1,R5 ;SRC ADDR = BBTA +] 
CLR (R2) :CDEST] = 000000 
MOV R2,R3 :ER R3] = DEST ADDR 
CCC ;CLEAR FLAGS - SCOPE SYNC 
2$: MOVB (R5),(R3)+ TEST THE MOVB 
CMP R4,(R2) ; CORRECT RESULT ? 
BEQ 4$ ;BR IF YES 
MOV (R2) ,R3 . GET THE WAS DATA 
33: ERROR 1 ;MOVB DELIVERED WRONG RESULT 
4$: CMP #MBUF 0+1,R3 :DID MOVB INCREMENT THE DEST REG ? 
BEQ TST502 77BR IF YES 
5$: ERROR 5 ;MOVB FAILED TO UPDATE DEST REG 
CF RRR REE EEEEEEREKEREREEREREREEEREEREREKEEER EERE EE 
s*TEST 502 MOVB TEST - SM1,DM3 - SRC ADR ODD / DST ADR EVEN 
CT AAR EEE ERE 
TST502: 
SCOPE rem THE SCOPE LOOP UTILITY 
MOV #502,RO0 OAD RO WITH TEST NUMBER 
MOV a#2$,R1 ‘OAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 DEST a Wy Ay 0 
MOV #377 ,R4 SRESULT S / 377 


MOV #DBTA+1 RS SRC ADDR = DBTA +7 





SEQ 0180 
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9776 033724 
9777 033726 
9778 033732 
9780 033734 


9782 033736 
9783 033742 


9785 033744 


9787 033746 
9788 033750 


9790 033752 
9791 033754 


033756 
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005012 
012703 
000257 
111533 


022703 
001401 


104005 


020412 
001402 


011203 
104001 


111543 


020302 
001401 


104005 


020412 
001402 


011203 
104001 


063312 


063314 


063314 
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MACY 182 
T502 TEST = SM1,DM3 = SRC ADR ODD / DST ADR EVEN SEQ 0181 
CLR (R2) ;C(DESTJ = 000000 
MOV MATA+10,R3 “BASE DEST ADDR = ATA +10 
ccc [CLEAR FLAGS = SCOPE SYNC 
2$: MOVB (R5) ,a(R3)+ ; TEST THE MOVB 
CMP #ATA+12,R3 ;DID DEST REG GET INCREMENTED ? 
BEQ 4$ ;BR IF YES 
3$: ERROR 5 :MOVB FAILED TO UPDATE DEST REG 
4$: CMP R4, (R2) ;CORRECT RESULT ? 
BEG TST503 ;;BR IF YES 
MOV (R2) ,R3 ;GET THE WAS DATA 
5$: ERROR 1 ;MOVB DELIVERED WRONG RESULT 
DRE ERE EERE EERE REE EEE ERR KEE EERE EH 
Z*TEST 503 MOVB TEST - SM1,DM4 = SRC ADR ODD / DST ADR EVEN 
CLEARER ERR EEE REE RRR RRA ERR ER AREER RRR EERE EE 
TST503: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #503,R0 +; LOAD RO WITH TEST NUMBER 
MOV af#2$,R1 :LOAD R1 WITH ae INSTRUCTION WORD 





MOV #DBTA+1,R5 :SRC ADDR = DBTA +1 






CLR (R2) :CDESTJ = 000000 
MOV 4MBUF 0+1 ,R3 INITIAL DEST ADDR = MBUFO+1 
ccc ;CLEAR FLAGS = SCOPE SYNC 










2$: MOVB (R5),-(R3) ;TEST THE MOVB 
CMP R3,R2 :DID MOVB DECREMENT DEST REG ? 
4$ ;BR IF YES 











3$: ERROR 5 :MOVB FAILED TO UPDATE DEST REG 


4$: CMP RG, (R2) :CORRECT RESULT ? 
BEQ TST504 77BR IF YES 













MOV (R2) ,R3 :GET THE WAS DATA 
5$: ERROR 1 MCB DELIVERED WRONG RESULT 







SL RAR ARERR AERA RARER EE 








*TEST 504 MOVB TEST - SM1,DM5 - SRC ADR ODD / DST ADR EVEN 
RRR REE RRERREREERER RRR ERE REE ERE REE 
151504: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #504,R0 >:LOAD RO WITH TEST NUMBER 

MOV 2$,R1 LOAD R1 ghee) INSTRUCTION WORD 









wDBTA+1. oR5 


(R2) : 00 
MATA+12,R3 ‘INITIAL DEST ADDR = ATA +12 
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034070 
034072 


034074 
034100 


034102 


034104 
034106 


000257 
111553 


022703 
001401 


104005 


020412 
001402 


011203 
104001 


111563 


020412 
001402 


011203 
104001 


111573 
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2$: 


3$: 
4$: 


5$: 


83 

TEST = SM1,DM5 = SRC ADR ODD / DST ADR EVEN SEQ 0182 
ccc CLEAR FLAGS = SCOPE SYNC 
MOVB (R5> ,a=(R3) :TEST THE MOVB 
CMP #ATA+10,R3 :DID MOVB DECREMENT DEST REG ? 
BEQ 4$ :BR IF YES 
ERROR 5 :MOVB FAILED TO UPDATE DEST REG 
CMP R4, (R2) :CORRECT RESULT ? 
BEQ TST505 :;BR IF YES 
MOV (R2) ,R3 :GET THE WAS DATA 
ERROR 1 :MOVB DELIVERED WRONG RESULT 


SL RARER RRR REE EERE EERE REE RRR EEREEEEEREERERREREEERER EERE ES 


S*TEST 505 MOVB TEST - SM1,DM6 = SRC ADR ODD / DST ADR EVEN 


FL IR RI TR IIR RI REE RE REE EERE ERE EE ER REE EE 


TST505: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #505.,R0 ; LOAD RO WITH TEST NUMBER 
MOV a¥2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #377 RS [RESULT S / B = 377 
MOV #DBTA+1 R5 ;SRC ADDR = DBTA +1 
CLR (R2) = [DEST] = 000000 
MOV #MBUF 0+6,R3 [BASE DEST ADDR = MBUFO+6 
ccc [CLEAR FLAGS - SCOPE SYNC 
2s: MOVB (R5) ,-6(R3) TEST THE MOVB 
CMP R4, (R2) ; CORRECT RESULT ? 
BEQ TST506 :;BR IF YES 
MOV (R2! .R3 ;GET THE WAS DATA 
3$: ERROR 1 :MOVB DELIVERED WRONG RESULT 
LLU EAA EAE EERE EERE ERE EREREREERRE EERE REE R ERE RES 
:*TEST 506 MOVB TEST - SM1,DM7 = SRC ADR ODD / DST ADR EVEN 
°  Seasdeeednesenneeeneeseecrecenneneenaaseeeenseneeneeneesentesss 
151506: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #506,RO0 ; LOAD RO WITH TEST NUMBER 
MOV af#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUF O,R2 DEST ADDR = MBUFO 
MOV #377, RS sRESULT S / B = 377 
MOV wpgtir, RS :SRC ADDR = DBTA +1 
CLR (R2) :CDESTJ = 000000 
MOV MATA,R3 BASE DEST ADDR = ATA 
| Se 2 CLEAR FLAGS - SCOPE SYNC 
es: MOVB (RS) ,a10(R3> : TEST THE MOVB 


CMP R4, (R2) s CORRECT RESULT ? 
BEQ 1s¥50? 7;BR IF YES 


an 
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7506 TEST = SM1,DM7 = SRC ADR ODD / DST ADR EVEN 


MOV (R2) ,R3 ;GET THE WAS DATA 
3$: ERROR 1 ;MOVB DELIVERED WRONG RESULT 
fF AAAAAAARAAAARARARAAARRAAARARARREARARRERARAARARARAAAARARAARAAERAED 
s*TEST 507 MOVB SMO,DM1 TEST 
Ff RRA AAARARAARAARAAARARARAAERARRARARARARRRERARAAARARARAARARERAANAEE 
TST507: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #507,R0 +; LOAD RO WITH TEST NUMBER 

MOV a#2$,Ri ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV AMBUF O,R2 DEST , 2 oS 

MOV #377 RS ;RESULT S / 377 

MOV #-1,R3 3R3 YONTRINS™ SOURCE oP 

MOV R2,R5 *R5 CONTAINS DEST ADDR 

CLR (R2) :CDEST] = 000000 

ccc ; SCOPE SYNC 
es: MOVB R3, (RS) ;TEST THE MOVB 

CMP R4,(R2) sRESULT CORRECT ? 

BEQ TST510 77BR IF YES 

MOV (R2) ,R3 ZGET THE WAS DATA 
3$: ERROR 1 ;MOVB DELIVERED THE WRONG RESULT 
SF AAA AARAAERAREEAREEERARAARARAERAREAERAARAERAERAERARARAAERRAARARR AEE 
s*TEST 510 MOVB SMO,DM2 TEST 
SEAR ARARAAARARRARAARRRRERRARERAEARHRAARAAARARAARAAAEARAAARAAERAEAAAED 
TST510: 

SCOPE 7 CALL THE SCOPE LOOP UTILITY 

MOV #510,R0 ZLOAD RO WITH TEST NUMBER 

MOV a#2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

MOV #377 RS SRESULT S / B = 377 

MOV #-1,R3 7R3 CONTAINS SOURCE OP 

MOV R2,R5 7R5 CONTAINS DEST ADDR 

CLR (R2) ;CDESTJ = 000000 

CCC ;SCOPE SYNC 
cs: MOVB R3,(R5)+ : TEST THE MOVB 

CMP R4,(R2) ;RESULT CORRECT ? 

BEQ TST511 :7BR IF YES 

MOV (R2) ,R3 ;GET THE WAS DATA 
3$: ERROR 1 sMOVB DELIVERED THE WRONG RESULT 
SETAE AERARARARRAEAAEARARAAERAAAAEARAAERAARAARAERAEERE 
:*TES!T 511 MOVE SMO,DM3 TEST 
SL AAA AR AEA AEE REE REARAEEHKEAEEAEAAAEAERAAEAERAAAAERAAEEARAERREREEKH EE 
TSI$112 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #511, As + LOAD RO WITH TEST NUMBER 

MOV a#2$.R ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV mur, R2 DEST wr — 0 


MOV #377, RESULT S$ 377 


SEQ 0183 | 


wo 
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MOVB 


1511 


3$: 


MOV 
ERROR 


C 15 
17=SEP=79 09: 
SMO,DM3 TEST 


#-1 ,R3 
MATA+10,R5 
(R2) 
R3,a(R5)+ 


R4, (R2) 
TST512 


—— 
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SEQ 0184 


;SOURCE OP IN R3 

;BASE DEST ADDR = ATA+10 
;CDEST] = 000000 

SCOPE SYNC 

;TEST THE MOVB 


RESULT CORRECT ? 
IF YES 


;GET THE WAS DATA 
:MOVB DELIVERED THE WRONG RESULT 


FT RRR ARR EAR EREREAAEAREERAE HERA AEREHRAEHRREERKREREERERAERERERERE ED 


“*eTEST 512 


tsi lez 


2$: 


3$: 


MOV 
ERROR 


MOVB SMO,DM4 TEST 


STARA AEA ARERR RERERERARRRERRRERERRREAKERERAERTRAEREREEH 


#512,R0 
a¥2$,R1 


AMBUFO,R2 
#177400,R4 
#-1,R3 
#MBUF 0+2,R5 
(R2) 


R3,-(R5) 


R4, (R2) 
TS7513 


~~ 


;CALL_ THE SCOPE LOOP UFILITY 
;;LOAD RO WITH TEST NUMBER 
DEST R1 R= MBUFO INSTRUCTION WORD 


7R3 CONTAINS SOURCE OP 
;BASE DEST ADDR = MBUFO+2 
;CDESTJ = 000000 

:SCOPE SYNC 


: TEST THE MOVB 
sRESULT CORRECT ? 
73BR IF YES 


;GET THE WAS DATA 
;MOVB DELIVERED THE WRONG RESULT 


SLEEK EREREEEEE RARER EREAEE ETRE EERE RARER & 


s*TEST 513 


1$1513: 


2$: 


3$: 


SCOPE 


MOVB SMO,DM6 TEST 


WES eee RRR RRR ERR RRSRERRRSRRAR RARE RRR RR RRRRR RRR RRR R RARER RASS SSE OD | 


R3,-2(R5) 


R4,(R2) 
TST514 


(R2) ,R3 
; 


:CALL_ THE SCOPE LOOP UTILITY 
>;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
[DEST ADDR = MBUFO 

RESULT S / B = 377 

3R3 CONTAINS SOURCE OP 

sBASE DEST ADDR = MBUFO+2 

;C(DESTJ = 000000 


SCOPE SYNC 
; TEST THE MOVB 


ZRESULT CORRECT ? 
7;BR IF YES 


GET THE WAS DATA 
;MOVB DELIVERED THE WRONG RESULT 
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10000 
10001 


C50503 


100003 
001402 
102401 
103401 
104002 


020403 
001401 


104002 


000004 
012700 
013701 


032737 
001401 


104002 


020403 
001401 


022525 


000515 
034660 


002000 063240 
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1513 MOVB 


SMO,DM6 TEST 

fF RARARERARAAAAAAAAAAARRAAAERRAAARARAAAARAAAARAERARAAAAAARARARORAEED 
s*TEST 514 BIS TEST = SMO,DMO = N:C = 0117 
fF RAARARARARARARARARARARAAAARARARARAAATERARRAAARARARARAARARERARAEE 
TS7T514: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #514,R0 ‘LOAD RO WITH TEST NUMBER 

MOV a#2$.R1 “LOAD R1 WITH TEST {ANS TRUCT ION wORD 

MOV #-1 R46 SRESULT S$ / B = 

MOV #125252,R5 [SRC OPR = 185352 

MOV #52525,R3 =(DEST] = 52525 

ccc “CLEAR FLAGS 

267 : = Q111 
2$: BIS R5,R3 : TEST THE BIS 

BPL 3$ sucC = 1001 7 

BEO 3$ 

BVS 3$ 

BCS 4$ 
3$: ERROR 2 BIS FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 Z CORRECT RESULT ? 

BEQ 1ST515 ;7;BR IF YES 
5$: ERROR 2 :BIS DELIVERED THE WRONG RESULT 
CE RAAAARAARAARAAAAAERARHRARAARAKRARERRARAARAEARAAARKAAARAAAHRARREREAAED 
S*TEST 515 BIS TEST - SMO,DMO - N:C = 1000 
CE RAR RRARAENRAARARRRARAARRKRAERAAAARARARERARRAAARRAAARARAA HARRAH A Ee 
TSTS15¢ 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #515,R0 ; LOAD RO WITH TEST NUMBER 

MOV ayv2$.R1 LOAD R1 WITH TEST INSTRUCTION WORD 
-SBITL USER CONTROLLED BREAKPOINT -- BIT10 

BIT #81T10,a4BPTLOC ;BREAKPOINT HALT SET 2? 

BEQ + ‘BR IF NOT 

HALT SBREAK-DEPRESS CONTINUE TO CONTINUE 

CLR R4 :RESULT S Ss / B = 000000 

CLR RS C OPR = 00 

CLR R3 ‘PDESTD = = 000000 

CCC =CLEAR FLAGS 

SEN =Nif = 1000 
2$: BIS R5,R3 :TEST THE BIS 

BMI 3$ IN:C = 0100 

BNE 3$ 

BVS 3$ 

BCC 4$ 
33: FRROR 2 :BIS FAILED TO ALTER CODES PROPERLY 
44: CMP R4,R3- sCORRECT RESULT ? 

BEQ TST516 : BR IF YES 


SEQ 0185 
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CQKDA-E KD11=K BASIC LOGIC TE 

CQKDAE .P11 17=SEP=79 09:47 USER CONTROLLED BREAKPOINT -- RIT10 SEQ 0186 

10056 

oe 0%700 104002 5$: ERROR 2 ;BIS DELIVERED THE WRONG RESULT 

10059 _E nine agr- hgh te piiommmay enim gyal cighs ating + eimai tease ti 
s*TEST 516 BIC TEST = SMO,DMO = N:C = 0117 

10061 LL UREA EERE ERE REE RREERROR EEE ERRE TEER R EERE REE EET 

10062 034702 TST5S16: 

10063 034702 000004 SCOPE ; CALL THE SCOPE LOOP UTILITY 

10064 034704 012700 000516 MOV #516,R0 +;LOAD RO WITH TEST NUMBER 

10065 034710 013701 034734 MOV af2$,R1 : LOAD R1 WITH ig INSTRUCTION WORD 

10066 034714 012704 100000 MOV #100000 ,R4 ;RESULT S / B = 100000 

10067 034720 012705 077777 MOV #77777 RS :SRC OPR = 77777 

10068 034724 012703 177777 MOV #-1,R3 :(DEST] = 177777 

10069 034730 00025 CCC [CLEAR FLAGS 

ony 034732 000267 267 N:C = 0111 

ib A 4 034734 040503 ef: BIC R5,R3 sTEST THE BIC 

10074 034736 100003 BPI. 3$ cN:C = 1007 ? 

10075 034740 001402 BEQ 3$ 

10076 034742 102401 BVS 3$ 

re 034744 103401 BCS 4% 

= 034746 104002 2$: ERROR 2 :BIC FAILED TO ALTER CODES PROPERLY 

10081 034750 020403 4$: CMP R4, : CORRECT RESULT ? 

ie 034752 001401 BEQ Hei? 77BR IF YES 

a 034754 104002 5$: ERROR 2 ZBIC DELIVERED THE WRONG RESULT 

10086 LRA EEE REE REEEREEREREEEAEERE RARER EHO RER ERR EERE HED 

10087 seTEST 517 BIC TEST - SMO,DMO - N:C = 1000 

10088 ’ ERE EER REE EET ERE EERE ERERREREEREREREKE EEE EE 

10089 034756 TS1517: 

10090 034756 000004 SCOPE 7 CALL THE SCOPE LOOP UTILITY 

10091 034760 012700 000517 MOV #517,R0 ;LOAD RO WITH TEST NUMBER 

10092 034764 013701 035002 MOV a#2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 

10092 034770 005004 CLR R4 sRESULT S / B = 000000 

10094 034772 005005 CLR RS ;SRC OPR = 000000 

10095 034774 005003 CLR R3 (DEST = 000000 

10096 034776 000257 te CLEAR FLAGS 

eee 035000 000270 SEN N:C = 1000 

4-44 035002 040503 2$: BIC R5,R23 STEST THE BIC 

10101 035004 100403 BM] 3$ iN:C = 0100 

10102 035006 001002 BNE 3$ 

10103 035010 102401 BVS 3$ 


10104 035012 103001 BCC 4$ 


15 
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CQKDA-E kD11=K BASIC 
CQKDAE .P11 17-SEP-79 1517 BIC TEST = SMO,DMO - N:C = 1000 SEC 0187 
IOIOe 035014 104002 3$: ERROR 2 ;BIC FAILED TO ALTER CODES PROPERLY 
10108 9035016 020403 4$: CMP R4,R3 ; CORRECT RESULT ? 

444 035020 001401 BEQ TST520 + BR IF YES 

1O\1> 035022 104002 S$: ERROR 2 ;BIC DELIVERED THE WRONG RESULT 
10113 LR RR CRETE ERE R EHR E REE RRERRER ERR ER ERS 
10114 s*TEST 520 BIT TEST - SMO,DMO - N:C = 0117 

10115 SLR RRR RARER EERE RARER EERE EE EERE EERE RR ERED 
10116 035024 TST520: 

10117 035024 000004 SCOPE # CALL THE SCOPE LOOP UTILITY 

10118 035026 012700 000520 MOV #520,R0 LOAD RO WITH TEST NUMBER 

10119 035032 013701 035056 MOV a#2$,R1 ‘i OAD R1 WITH TEST INSTRUCTION WORD 
10120 035036 012704 100000 MOV #100000, RS [RESULT S / B = 100000 

10121 035042 012705 100000 MOV #100000,R5 :SRC OPR = 100000 

10122 035046 012703 100000 MOV #100000.R3 :CDESTJ = 100000 

10123 035052 000257 ccc ; CLEAR FLAGS 

1 iSe 035054 000267 267 iN:C = 0111 

iss 035056 030503 cs: BiT R5,R3 s TEST THE BIT 

10128 035060 100003 BPL 3$ 3N:C = 1001 

10129 035062 140 BEQ 3 

10130 035064 102401 BVS 3$ 

Ales 035066 103401 BCS 4$ 

10133 035070 104002 3g: ERROR 2 :BIT FAILED TO ALTER CODES PROPERLY 
10135 035072 020403 4$: CMP R4,R3 ; CORRECT RESULT ? 

af 035074 001402 BEO TST521 ;:BR IF YES 


o-oo 
WINIW 
mow 
WIN — 
MOVIN 
MINIM — 


| 
10138 035076 011203 MOV (R2) ,R3 ;GET THE WAS DATA 
+ 4b 035100 104002 5$: ERROR 2 ;BIT DELIVERED A RESULT 
10141 LL RRR RRR REE EER ERR ERE RRR AREER 
10142 *TEST 521 BIT TEST - SMO,DMO - N:C = 1000 
10143 DIO IIIIIOIIIIIIIOIIUIIDIDIDIDIOIUIOIIUIDIDIUIUIDIDIUIUIDIIDIOIUIOIIOUIUIUIUIIOII I nt ott 
10144 035102 TSTS21: 
10145 035102 000004 SCOPE : CALL THE SCOPE LOOP UTILITY 
10146 035104 012700 00052 MOV #521,RO ;LOAD RO WITH TEST NUMBER 
10147 035110 013701 MOV a4#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
10148 035114 012704 MOV #125252 ,R4 SRESULT S / B = 125252 
10149 035120 012705 MOV #52525,R5 SRC OPR = 52525 
10150 035124 010403 MOV R4,R3 sppe sta = 125252 
10151 035126 000257 CCC eg FLAGS 
ab. 4 035130 000270 SEN 3N 1000 
dF 035132 030503 23: BIT R5,R3 =; TEST THE BIT 
10156 035134 100403 BM! 3$ iN:C = 0100 
10157 035136 001002 BNE 3$ 
10158 035140 102401 BvS 3$ 
10159 035142 103001 BCC 4% 
10160 
ee ee ee ee Te Ee EN AS RY iste PN ERG Aa SSL oR a As (bl 
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CQKDA=E KD11=k BASIC LOGIC TE 
CQKDAE .P11 17=SEP=79 09:47 1521 BIT TEST = SMO,DMO - N:C = 1000 SEQ 0188 
oie 035144 104002 3$: ERROR 2 ;BIT FAILED TO ALTER CODES PROPER: ¥ 
10163 035146 020403 4$: CMP R4,R3 : CORRECT RESULT ? 

ae: 035150 001401 BEQ T7522 :;BR IF YES 

ree 035152 104002 5$: ERROR 2 ;BIT DELIVERED A RESULT 

10168 nie eee ote cae alee aerate eggs eit iri aadciaiae teh 
10169 S*TEST 522 CMP TEST - SMO,DMO - N:C = 0110 

10170 DL IRE RARER EER REE ERA ERARR EERE E EERE RE REE 
10171 035154 TSTS22: 

10172 035154 000004 SCOPE : CALL THE SCOPE LOOP UTILITY 

10173 035156 012700 000522 MOV #522,R0 LOAD RO WITH TEST NUMBER 

10174 035162 013701 035204 MOV aF2$,R1 ‘ioaD R1 WITH ae INSTRUCTION WORD 
10175 035166 012704 000001 MOV #+1,R4 SRESULT S$ / B = #1 

10176 035172 005005 CLR RS ;SRC_OPR = 000000 | 
10177 035174 012703 000001 MOV #+71,R3 :CDESTJ = ¢1 

10178 035200 000257 CCC ; CLEAR Ay 

iy Sf 6 035202 000266 266 3N:C = 0110 

H+ 44 44 035204 020503 2$: CMP R5,R3 TEST THE CMP 

10183 100003 BPL 3$ C = 1001 

10184 035210 001402 BEQ 3$ 

10185 035212 102401 BVS 3$ 

9 035214 103401 BCS 4$ 

44h 035216 104002 3$: ERROR 2 7CMP FAILED TO ALTER CODES PROPERLY 
10190 035220 020405 4$: CMP R4,R3 ;CORRECT RESULT ? 

a 48 4) 035222 001401 BEO TST523 37BR IF YES 

th 035224 104002 5$: ERROR 2 :CMP DELIVERED A RESULT | 
10195 LL TR TERR REE REE REET EER EER ARORA RE 
10196 SATEST 523 CMP TEST ~ SMO,DMO - N:C = 1010 
10197 DLR ERR REE EERE EERE REE REE RER REE Ee 
10198 035226 TST523: 

10199 035226 000004 SCOPE 2 CALL THE SCOPE 1.00P UTILITY 

10200 035230 012700 000523 MOV #523,R0 ;LOAD RO WITH TEST NUMBER 

10201 035234 013701 035256 MOV a#e$,R1 “LOAD R1 WITH ig we ahem WORD 
10202 035240 012704 177777 MOV #-1,24 sRESULT S / B= 

10203 035244 012705 177777 MOV #-1,R5 :SRC OPR = Br777" 

10204 035250 010403 MOV R4,R3 :CDESTJ = 177777 

10205 035252 000257 CCC CLEAR FLAGS 

5 3 035254 000272 272 iN:C = 1010 

H's 035256 020503 ef: CMP R5,R% TEST THE CMP 

10210 035260 100403 BM! 3$ iN:C = 0100 

102711 035262 001002 BNE 3$ 

10212 035264 102401 BVS 3$ 

AF 035266 103001 BCC 4$ 

10215 035270 104002 3$: ERROR 2 7CMP FAILED TO ALTER CODES PROPERLY 
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ee 

COKDAE.P11 —-17=SEP=79 09:47 1523 CMP TEST = SMO,DMO - N:C = 1010 SEQ 0189 | 
10217 035272 020403 48: CMP R4 ,R3 CORRECT RESULT ? 
4 035274 001401 BEQ TST524 :;BR IF YES 

10220 035276 104002 5$: ERROR 2 ;CMP DELIVERED A RESULT 
10222 LL E REAR RA EEE H EERE REE ERR ERR 
10223 Z*TEST 524 CMP TEST = SMO,DMO - N:C = 0000 

10224 DL REET RER EERE ERR 

10225 035300 TSTS26: 

10226 035300 000004 SCOPE CALL THE SCOPE LOOP UTILITY 

10227 035302 012700 000524 MOV #524 ,R0 ;:LOAD RO WITH TEST NUMBER 

10228 035306 013701 035330 MOV +e ;LOAD R1 WITH TEST INSTRUCTION WORD 

10229 035312 012704 000001 MOV RESULT S / B = #1 

10230 035316 012705 100000 MOV 7100000, R5 SRC OPR = 100000 

10231 035322 012703 000001 MOV +7 ,R3 :CDESTJ = +1 

Sat 035326 000257 ccc CLEAR FLAGS 

10234 035330 020503 2s: (MP RRB TEST THE CMP 

10236 035332 100403 BM! 3$ NEC = 0010 

10237 035334 001402 BEQ 3$ 

10238 035336 102001 BvC 3$ 

444 035340 103001 BCC 4$ 

wed 035342 104002 3$: ERROR 2 ;CMP FAILED TO ALTER CODES PROPERLY 

10243 035344 020403 4$: CMP R4,R3 ; CORRECT RESULT ? 

7s 035346 001401 BEQ TST525 ;:BR IF YES 

race 035350 104002 5$: ERROR 2 :CMP DELIVERED A RESULT 

10248 DOI III IIIUIIIOIIUIUIUIIIGIOICIOIIUIOIUIDIUIDIOIUIOIDIIUIUIUIDIOIUIOIUIOIIUIIO I iti i tit titer 

10249 TEST 525 BIS TEST - SMO,DM1 - N:C = 0111 

10250 DDO IIIIIIIOIIUIDIOIUIDIOIOIIDIDIOIIUIOIUIOIUIIUIUIIUUIUIUIIOIOUIIOUODR Rt htt tnt tts 

10251 035352 TST525: 

10252 035352 000004 SCOPE CALL THE SCOPE LOOP UTILITY 

10253 035354 012700 000525 MOV #525,R0 ;:LOAD RO WITH TEST NUMBER 

10254 035360 013701 035410 MOV af#2$,R1 ;LOAD Ri WITH TEST INSTRUCTION WORD 

10255 035364 012702 063316 MOV AMBUFO,R2 :DEST ADDR = MBUFO 

10256 035370 012704 177777 MOV #-1 RS RESULT S / B = 177777 

10257 035374 012705 125252 MOV #125252,R5 SRC OPR = 125252 

10258 035400 012712 052525 MOV #52525, (R2) ;CDEST] = 52525 

10259 035404 000257 CCC ee A 

ced 035406 000267 267 = 011 

Hs 035410 050512 e$: BIS R5,(R2) TEST THE BIS 

10264 035412 100003 BPL 3$ iN:C = 10017 

10265 035414 001402 BEQ 3$ 

10266 035416 102401 BVS 3$ 

ie 035420 103401 BCS 4$ 

Stn 035422 104001 3$: ERROR 1 :BIS FAILED TO ALTER CODES PROPERLY 

10271 035424 020412 4$: CMP R4,(R2) CORRECT RESULT ? 


10272 035426 001402 BEG TS7526 7;3BR IF YES 


CQKDA-E KD11-K BAS! 
CQKDAE .P 71 


035430 
035432 


035474 
035476 


035500 
035502 


035504 
035506 


035510 


035544 
035546 
035550 


035556 
035560 


C LO 
17=SEP=79 


011203 
104001 


050512 
100403 
001002 
102401 
103001 
104001 


020412 
001402 


011203 
104001 


104001 


GIC T 
09:4 


000526 
035464 
063316 


ESTS 
7 


7525 


58: 


MACY11 ate 
BIS 


MOV 
ERROR 


S*TEST 526 


1$1526: 


5$: 


MOV 
ERROR 


I 15 
2) 17=SEP=79 09:55 nit 191 


TEST = SMO,DM1 = N:( 


ne? 


R4,(R2) 
TST527 


pet Ae 


GET THE WAS DATA 
;BI1S DELIVERED THE WRONG RESUL¢ 


SL REAR ARAAAAARARAHARERARAEARRARRAAAARRAAAARARAAARARARARARRAHRARAAEEE DHE 


BIS TEST = SMO,DM1 = N:C = 1000 


SERRE EERE AAEARARERAEAAARAAAARAKRAAAEKAREKAEAAEHHHHEREH EE 


= CALL THE SCOPE aT UTILITY 
;LOAD RO WITH TEST NUMBER 
: LOAD R1 WITH TEST INSTRUCTION WORD 


SR = 
CDESTJ = 000000 


;CLEAR FLAGS 


C = 1000 


i TEST THE BIS 


= 0100 


BIS FAILED TO ALTER CODES PROPERLY 
:CORRECT RESULT ? 
77BR IF YES 


;GET THE WAS DATA 
;BIS DELIVERED THE WRONG RESULT 


SRR RRR ERE EERE EERE EEE REAR EREEREEKKEEE EH 


S*TEST 527 


TS1527: 


2$: 


3$: 


BIC TEST - SMO,DM1 - N:C = 0111 


SORE RAE EE 


AMBUF 0 ,R2 
#100000 ,R4 
#77777 ,R5 
#-1, (Re) 


R5,(R2) 


2 CALL THE SCOPE LOOP he I 
LOAD RO WITH TEST NUMBER 
[LOAD R1 WITH TEST INSTRUCTION WORD 


[DEST ADDR = 


MBUF 
RESULT S / B = 100000 
:SRC_OPR 
sCDEST] = 177777 


77777 


Se ae FLAGS 


C = 0111 


i TEST THE BIC 


C = 100% 


:BIC FAILED TO ALTER CODES PROPER: Y 


SEQ 0190 


CQKDA=E KD11=-K BASIC LOG 


CQKDAE .P11 


035562 
035564 


035566 
035570 


035572 


035620 
035622 
035624 


035632 
035634 


035636 
035640 


035702 
035704 


035706 
035710 
035712 
035714 


17-SEP-79 


020412 
001402 


011203 
104001 


2 
102401 
103001 


104001 


020412 
001462 


071203 
104001 


102401 
103401 


IC TESTS 
09:47 


000530 
035622 
063316 
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1527 BIC TEST = SMO,DM1 - N:C = 0111 


4$: CMP R4,(R2) ; CORRECT RESULT ? 

BEQ TST530 : BR i- VES 

MOV (R2) ,R3 iGET THE WAS DATA 
S$: ERROR 1 sBIC DELIVERED THE WRONG RESULT 
CE ERAAARAARARAAERRAAEAARRARAKRARRARRAERRRRARAARARRERARAHRAARHEHEAHH 
s*TEST 530 BIC TEST = SMO,DM1 = N:C = 1000 
SEERA ERAERAREREEERREREEERRERRARERRERAAERAERAAERAEEREH EERE REED 
TST530: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #530,R0 +; LOAD RO WITH TEST NUMBER 

MOV aF2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV AMBUFO,RZ :DEST ADDR = MBUFO 

CLR RS tg a S_ / B = 000000 

CLR R5 = 000000 

CLR (R2) ‘PDESTI = ~ 000000 

CCC ; CLEAR FLAGS 

SEN *N:C = 1000 
2$: BIC R5,(R2) sTEST THE BIC 

BM! 3$ zN:C = 0100 

BNE 3$ 

BVS 3$ 

BCC 4$ 
3$ ERROR 1 ;BIC FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) ; CORRECT RESULT ? 

BEQ TST531 : BR IF YES 

MOV (R2) ,R3 ;GET THE WAS DATA 
5$: ERROR 1 ;BIC DELIVERED THE WRONG RESULT 
CLARE RARER AERA RARER RAR EES 
s*TEST 531 BIT TEST - SMO,DM1 - N:C = 0111 
SIRE RRA ARERR ERE ERAEERARERAEAERAEAEAEERHERR EHR 
TST531: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #531,R0 iL OAD RO WITH TEST NUMBER 

MOV af#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 *DEST or = A 0 

- MOV #100000 ,R4 sRESULT S / 100000 

MOV #100000,R5 ;SRC OPR = 180000 

MOV #100000, (R2) ;CDESTJ = 100000 

CCC pe FLAGS 

267 = 0111 
23: BIT R5,(R2) :TEST THE BIT 

BPL 3$ iN:C = 1001 

BEQ 3$ 

BvS =: 3$ 

BCS 4$ 





SEQ ae 
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CQKDA-E KD11=-k BASIC LOGIC TE 
CQKDAE .P11 17=SEP=79 09:47 1531 BIT TEST = SMO,DM1 = N:C = 0111 SEQ 0192 
10585 035716 104001 %$: ERROR 1 sBIT FAILED TO ALTER CODES PROPERLY ' 
10387 035720 020412 4$: CMP R4, (R2) =CORRECT RESULT ? 

10588 035722 001402 BEQ TST532 ::BR IF YES 

10390 035724 011203 MOV (R2) ,R3 GET THE WAS DATA 

1099), 035726 104001 S$: ERROR 1 sBIT DELIVERED A RESULT 

10393 DLR ERER RAE ER EAR REE ERR ERE REA POH 
10394 s*TEST 532 BIT TEST = SMO,DM1 = N:C = 1000 

10395 SPREE REE ERE ERE EERE ERE REEREEEREAREAER ERE EE 
10396 035730 TST532: 

10397 035730 000004 SCOPE CALL THE SCOPE LOOP UTILITY 

10398 035732 012700 000532 MOV #532.R0 +:LOAD RO WITH TEST NUMBER 

10399 035736 013701 035766 MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
10400 035742 012702 063316 MOV AMBUF 0,R2 :DEST ADDR = FO 

10401 035746 012704 052525 MOV #52525 ,R4 sRESULT S / B = 52525 

10402 035752 012705 125252 MOV #125252,R5 :SRC OPR = 125252 

10403 035756 012712 052525 MOV #52525, (R2) (DEST = 52525 

10404 035762 000257 ccc sCLEAR FLAGS 

10405 035764 000270 SEN = 1000 

10407 035766 030512 2$: BIT R5, (R2) :TEST THE BIT 

10409 035770 100403 BMI 3$ IN:C = 0160 

10410 035772 001002 BNE 3$ 

10411 035774 102401 BVS 3$ 

10412 035776 103001 BCC 4$ 

1Os16 036000 104001 3$: ERROR 1 :BIT FAILED TO ALTER CODES PROPERLY 
10416 036002 020412 4$: CMP R4, (R2) CORRECT RESULT ? 

ei? 036004 001402 BEQ TST533 :;BR IF YES 

10419 036006 011203 MOV (R2) ,R3 GET THE WAS DATA 

10420 036010 104001 S$: ERROR 1 :BIT DELIVERED A RESULT 

10421 ee a pal tage ta mg la a sas att 
10422 Z*TEST 533 CMP TEST - SMO,DM1 - N:C = 1010 

10423 CLARE RARER KERR ERE EKER REREAD 
10424 036012 TS1533: 

10425 036012 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 

10426 036014 012700 000533 MOV #533,RO *:LOAD RO WITH TEST NUMBER 

10427 036020 013701 036050 MOV av2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
10428 036024 012702 063316 MOV #MBUF 0,R2 ‘DEST ADDR = MBUFO 

10429 036030 012704 177777 MOV #-1,R4 sRESULT S / B = -1 

10430 036034 012705 177777 MOV #-1,R5 SRC OPR = 177777 

10431 036040 012712 177777 MOV #-1, (R2) s(DEST] = 177777 

10432 036044 000257 CCC ‘CLEAR FLAGS 

10458 036046 000272 272 = 1010 

10435 036050 020512 2$: CMP R5, (R2) sTEST THE CMP 

10437 036052 100403 BM! 3$ :N:C = 0100 

10438 036054 001002 BNE 3$ 

10439 036056 102401 BVS $$ 

10440 036060 103001 BCC 4$ 
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CQKDAE .P11 17=SEP=79 09:47 1533 TEST = SMO,DM1 - N:C = 1010 SEQ 0193 
10441 | 
Yor 036062 104001 3$: ERROR 1 ;CMP FAILED TO ALTER CODES PROPERLY 
10444 036064 020412 4$: CMP R4, (R2) CORRECT RESULT ? 

Ms ors 036066 001402 BEQ TST534 ;:BR IF YES 

10447 036070 011203 MOV (R2) ,R3 ;GET THE WAS DATA 

ep 036072 104001 5$: ERROR 1 CMP DELIVERED A RESULT 

10450 RII IIOISIOIIIDIOIIIUIIIOIIIDIOIIIOIOIOIDIOIIOIUIDIIIDIOIIOISIIIIOIUIOIIUIDIIIOIIOIIDIOIOIOIDID IE 
10451 S*TEST 534 CMP TEST = SMO,DM1 = N:C = 0110 

10452 ORI IO IOIDIOISIICIOIUIOIIOIOIOIIISIOIOIIUIOIDIOIOIIOIDIOIOIIIDIUGIDIOISIDIIDIOIOI I It 
10453 036074 181534: 

10454 036074 000004 SCOPE Hey” THE SCOPE LOOP UTILITY 
10455 036076 012700 000534 MOV #534 ,RO OAD RO WITH TEST NUMBER 

10456 036102 013701 036130 MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
10457 036106 012702 063316 MOV AMBUF 0 ,R2 ;DEST ADDR = MBUFO 

10458 036112 012704 000001 MOV #+17,R4 RESULT S / B = +1 

10459 036116 5005 CLR :SRC_OPR = 000000 

10460 036120 012712 000001 MOV #+1,(R2) :CDESTJ = +1 

10461 036124 000257 CCC CLEAR FLAGS 

op 1 036126 000206 266 2N:C = 0110 

thane 036130 020512 2$: CMP R5, (Re) ;TEST THE CMP 

10466 036132 100003 BPL 3$ iN:C = 1001 

10467 036134 001402 BEQ 3$ 

10468 036136 102401 BVS 3$ 

Mog 24 036140 103401 BCS 4$ 

Hot Al 036142 104001 3$: ERROR 1 ;CMP FAILED TO ALTER CODES PROPERLY 
10473 036144 020412 4$: C R4, (R2) CORRECT RESULT ? 

Hog 036146 001402 BEQ 181535 7;BR IF YES 

10476 036150 011203 MOV (R2> ,R3 :GET THE WAS DATA 

og Ad 036152 104001 5$: ERROR 1 CMP DELIVERED A RESULT 

10479 Tipe aaaaatatany innit teasing aap eater aarti 
10480 :*TEST 535 CMP TEST ~ SMO,DM1 - N:C = 0000 

10481 COI III IIIIIUIDIOIOIIIIIUIOIIOIUIOIIIOIOIIOIOIOISIOIOI IIDC ISTO ITO TOOT 
10482 036154 TST535: 

10483 036154 000004 SCOPE ay THE SCOPE LOOP UTILITY 
10484 036156 012700 000535 MOV #535 RO OAD RO WITH TEST NUMBER 

10485 036162 013701 036210 MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
10486 036166 012702 063316 MOV AMBUF 0 ,R2 :DEST oe * MBUF 0 

10487 036172 912704 000001 MOV A+1 RG RESULT S / B = +1 

10488 036176 012705 100000 MOV #100000 ,R5 zSRC_OPR = pooeee 

10489 036202 012712 000001 MOV #+1,(R2) :CDESTI = 

Sot | 036206 000257 ccc : CLEAR FLAGS 

ape | 036210 020512 2$: CMP R5, (Re) sTEST THE CMP 

10494 036212 100403 BM! 3$ zN:C = 0010 

10495 036214 001402 BEQ 3$ 
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17=SEP=79 09:47 TEST = SMO,DM1 - N:C = 0000 


CQKDAE .P11 
036220 
036222 


036224 
036226 


103001 
104001 


020412 
001402 


011203 
104001 


051503 


100003 
001402 
102401 
103401 
104002 


020403 
001401 


104002 


051503 
100403 
001002 
102401 
103001 


BCC 4$ 
ERROR 1 ;CMP FAILED TO ALTER CODES PROPER: Y 


CMP R4,(R2) ; CORRECT RESULT ? 
BEG TST536 ;;BR IF YES 


MOV (R2) ,R3 GET THE WAS DATA 
ERROR 1 7CMP DELIVERED A RESULT 


DLR RRERERERAEREEERRE REE 
T*TEST 536 BIS TEST - SM1,DMO = N:C = 0111 
CLARA RARER REAR RERERARREEREREREREER RR EEREEEEEEAEREREAERAEREEKEREEREAE ERE 
TST536: 
ZCALL THE SCOPE LOOP UTILITY 
*:LOAD RO WITH TEST NUMBER 
‘LOAD R1 WITH TEST INSTRUCTION WORD 
2R4 RESULT S / B = 177777 
ADWIA+10,R5 SSRC ADDR = DWTA+10 
052525 #52525,R3 :(DEST] = 52525 
=CLEAR FLAGS 
sw:€ = 0117 


(R5) ,R3 : TEST THE BIS 
su:C = 1001 


;BIS FAILED TO ALTER CODES PROPERLY 
+ CORRECT RESULT ? 
IF YES 


;BIS DELIVERED THE WRONG RESULT 


DLR Fe EKER REE EERE REE EERE EE 
S*TEST 527 BIS TEST - SM1,DMO - N:C = 1000 
CD ERK ERR EERE EERE EERE ERE EER EEE REE EREEREE KKK 
TST537: 
:CALL THE SCOPE LOOP UTILITY 
#537,RO >: LOAD RO WITH TEST NUMBER 
2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
R4 RESULT v, 4 = aces 
#DWTA,RS 7SRC ADDR = 
R3 ;CDESTJ = 000000 
‘CLEAR FLAGS 
*N:C = 1000 


TEST THE BIS 
= 0100 


SEQ 0194 





ey KD11-K BASIC LOG 


QKDAE .P11 


036350 


036352 
036354 


036356 


17=SEP=79 


104002 


020403 
001401 


104002 


Ic TESTS 
09:47 


077777 


000541 
036466 


063326 
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1537 S TEST = SM1,DMO - N:C = 
3$: ERROR 2 :BIS FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 s CORRECT RESULT ? 

BEQ TST540 :;BR IF YES 
S$: ERROR 2 :BIS DELIVERED THE WRONG RESULT 
| docripeigge or as tip gee pagsga nen ane tata at capt 9 al cia iia meta 
T*TEST 540 BIC TEST - SM1,DMO = N:C = 0111 
retiree iti ititti titi tii ttiittiti iti tit iii 
TST540: 

SCOPE ZCALL THE SCOPE LOOP UTILITY 

MOV #540, RO *:LOAD RO WITH TEST NUMBER 

MOV av2$.R1 “LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #100000,R4 “RESULT S$ / B = 100000 

MOV AMBUF 1 RS *SRC ADDR = MBUF1 

MOV #-1,R3 :C(DEST] = 177777 

MOV #77777, (R5) :SRC OPR = 77777 

CCC : CLEAR FLAGS 

267 :€ = 0111 
2$: BIC (RS) .R3 :TEST THE BIC 

BPL 3$ :N:C = 1001 ? 

BEQ 3$ 

BVS 3$ 

BCS 4$ 
3$: ERROR 2 :BIC FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 : CORRECT RESULT ? 

BEQ TST541 :;BR IF YES 
5$: ERROR 2 :BIC DELIVERED THE WRONG RESULT 
DLR E RE EEREEEEEERE REREAD 
S*TEST 541 BIC TEST - SM1,DMO - N:C = 1000 


SITTER ERR EEE AEE ERE REE REE ERE 


1$1541: 


SCOPE ey THE SCOPE LOOP UTILITY 
MOV #541,RO0 OAD RO WITH TEST NUMBER 
MOV a#2$,R1 ‘iad. R1 WITH TEST INSTRUCTION WORD 
CLR R4 :RESULT S$ / B = 000000 
MOV ADWTA,RS :SRC ADDR = DWIA 
CLR R3 ;CDESTJ =000000 
ccc CLEAR FLAGS 
SEN iN:C = 1000 
2s: BIC (R5) ,R3 TEST THE BIC 


BM! 3$ iN:C = 0100 


SEQ 0195 





ee ee I 


ee ee ee ee ees 
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CQKDA~E A bhiee BASIC LOGIC TE 

CQKDAE .P 17=SEP=79 09:47 1541 BIC TEST = SM1,DMO - N:C = 1000 SEG O'% 
Moc 24 036500 104C02 3$: ERROR 2 ;BIC FAILED TO ALTER CODES PROPERLY 
10611 036502 020403 4$: CMP R4,R3 CORRECT RESULT ? 

eels 036504 001401 BEQ TST542 :;BR IF YES 

Were 036506 104002 5$: ERROR 2 ;BIC DELIVERED THE WRONG RESULT 
10616 LLU REE REE REREREREREERREERREEREREER ARETE REAR E TAO e 
10617 s*TEST 542 BIT TEST - SM1,DMO - N:C = 0111 

10618 LLU REE E ERE EERE RREREREREE REAR ERE RRR E EOS 
10619 036510 TST5S42: 

10620 036510 000004 SCOPE ;CALL_THE SCOPE LOOP UTILITY 

10621 036512 012700 000542 MOV #542,RO0 ;;LOAD RO WITH TEST NUMBER 

10622 036516 013701 036540 MOV a#2$ ,R1 ;LOAD R1 WiTH TEST INSTRUCTION WORD 
10623 036522 012704 100000 Mov —- #100000,R4 :RESULT $ / B = 100000 

10624 036526 012705 063330 MOV A#DWTA+2,R5 [SRC ADDR = DwWTAt2 

10625 036532 010403 MOV R4 ,R3 :CDEST] = 100000 

10626 036534 000257 ccc oe A 

+x 14 036536 000267 267 = 011 

Hy 'v4 34 036540 031503 2$: BIT (RS) ,R3 ;TEST THE BIT 

10631 036542 100003 BPL 3$ N:C = 1001 ? 

10632 036544 001402 BEQ 3$ 

10633 036546 102401 BVS 3$ 

ieee 036550 103401 BCS 4$ 

ee 036552 104002 3$: ERROR 2 :BIT FAILED TO ALTER CODES PROPER ¥ 
10638 036554 020403 4$: CMP R4,R3 ;CORRECT RESULT ? 

Ms eae 036556 001401 BEQ TST543 :;BR IF YES 

seat! 036560 104002 5$: FRROR 2 BIT DELIVERED A RESULT 

10643 DI IITA EERR EEE EE REE REE Ee eee 
10644 S*TEST 543 BIT TEST - SM1,DMO - N:C = 1000 

10645 PETTITT TLILI LITTLE LTT LLL TLE LET ELLE 
10646 036562 151543: 

10647 036562 000004 SCOPE _ THE SCOPE LOOP UTILITY 
10648 036564 012700 000543 MOV #543,R0 3;LOAD RC WITH TEST NUMBER 

10649 036570 013701 036612 MOV af2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
10650 036574 012704 052525 MOV #52525 ,R4 RESULT S / B = 52525 

10651 036600 012705 063336 MOV #DWTA+10,R5 C ADDR = DWIA+10 

10652 036604 910403 MOV R4,R3 PEST) = 52525 

10653 036606 000257 CCC CLEAR FLAGS 

Hof =: 036610 000270 SEN 3N:C = 1000 

+ +t | 036612 031503 2$: BIT (R5) ,R3 sTEST THE BIT 

10658 036614 100403 6M] 3$ 3N:C = 0100 

10659 036616 001002 BNE 3$ 

10660 036620 102401 BVS 3$ 

eet 036622 103001 BCC 4$ 


» 
10663 036624 104002 3$: ERROR 2 BIT FAILED TO ALTER CODES PROPER: ¥ 
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CQKDAE .P11 17=SEP=79 09:47 1543 BIT TEST = SM1,DMO - N:C = 1000 
10665 036626 020403 4$: CMP R4 RB CORRECT RESULT ? 
ieee 036630 001401 BEC TST544 3:BR IF YES 
10668 036632 104002 5$: ERROR 2 :BIT DELIVERED A RESULT 
10669 "to gp reget ho ---gpebaepttalag =foiaaattadl 
10670 S*TEST 544 CMP TEST ~ SM1,DMO = N:C = 0110 
10671 LURE REAR EERE REE REE R EEE EER EERE EERE RETR RE ee 
10672 036634 TST544: 
10673 036634 000004 SCOPE + CALL THE SCOPE LOOP UTILITY 
10674 036636 012700 000544 MOV #544 ,,RO ;LOAD RO WITH TEST NUMBER 
10675 036642 013701 056664 MOV a#2$,R1 : LOAD R1 WITH a INSTRUCTION WORD 
10676 036646 012704 000001 MOV #+1 RG ty S/B= 
10677 036652 012705 063326 MOV ADWTA,RS sSRC_ ADDR = DWwTA 
10678 036656 010403 MOV R4,R3 :CDEST] = +1 
10679 036660 000257 ccc [CLEAR FLAGS 
peat 036662 000266 266 iN:C = 0110 
Hee 1 036664 021503 es: CMP (R5) ,R3 TEST THE CMP 
10684 036666 100003 BPL 3$ iN:C = 1001 
10685 036670 001402 BEQ 3$ 
10686 036672 102401 BVS 3$ 
wr of 036674 103401 BCS 4$ 
rene 036676 104002 3$: ERROR 2 ;CMP FAILED TO ALTER CODES PROPERLY 
10691 036700 920403 4$: CMP R4,R3 ;CORRECT RESULT ? 
sot | 036702 001401 BEQ TST545 ::BR IF YES 
"wt! 036704 104002 S$: ERROR 2 ;CMP DELIVERED A RESULT 
10696 OIRO IOS III IIIT UIOIUIOIUIIIOIIOIOIOIUIOIUICIOIOIIOICIOIUIOTO TOI TOR itt t tit tt 
10697 s*TEST 545 CMP TEST = SM1,DMO0 - N:C = 1010 
10698 CDR fe te tO Oi Ti Ti IIIT TOI III RO ih ht tnt ttt 
10699 036706 TST545: 
10700 036706 000004 SCOPE 2 CALL THE SCOPE LOOP UTILITY 
10701 036710 012700 000545 MOV #545 ,RO ;LOAD RO WITH TEST NUMBER 
10702 036714 013701 036736 MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
10703 036720 012704 177777 MOV #-1 RG sRESULT S / B = 177777 
10704 036724 012705 063330 MOV #DWTA+2,R5 :SRC ADDR = DTA+? 
10705 036730 010403 MOV R4,R3 :CDEST] = 177777 
10706 036732 000257 CCC CLEAR FLAGS 
0 036734 000272 272 iN:C = 1010 
+ st 64 036736 021503 2%: CMP (R5) ,R2 ;TEST THE CMP 
10711 036740 100403 I 3$ iN:C = 0100 
10712 036742 001002 BNE 3$ 
10713 036744 102401 BvS 3$ 
1orre 036746 103001 BCC 4$ . 
10716 036750 104002 3$: ERROR 2 7CMP FAILED TO ALTER CODES PROPERLY 


10718 036752 020403 4$: CMP R4,R3 : CORRECT RESULT ? 
10719 024754 001401 BEQ TST546 33BR IF YES 
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037014 
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037030 
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037072 
037074 
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7545 
5$: 


ERROR 


16 
17=SeP=79° 09:55 PAGE 199 
CMP TEST = SM1,DMO - N:C = 1010 


2 


;CMP DELIVERED A RESULT 


DRA AAARRRRRRRRAAARASASAARRALARARRAR RR RRR SERRE RRR SRA RRS ASS RR RRS R SS BI 


T*TEST 546 


SORA AREER ARKAREEAARAAKEAEARHERRRKKAAKATEEE 


5$: 


151546: 


SCOPE 


ERROR 


CMP TEST = SM1,DMO = N:C = 


+71 ,R3 
#100000, (RS) 


(R5) ,R3 


R4,R3 
TST547 


2 


0000 


: CALL THE SCOPE LOOP UTILITY 
;LOAD RO WITH TEST NUMBER 
:LOAD R1 WITH ee INSTRUCTION WORD 


:CLEAR FLAGS 
;TEST THE CMP 
= 0010 


;CMP FAILED TO ALTER CODES PROPERLY 
;CORRECT RESULT ? 
;;BR IF YES 


;CMP DELIVERED A RESULT 


eee 


2° TEST 547 


s PPT T TOUT TTT TT TTCT TIT TET TTT TTTTITTTTT TTT TTT TTT TTT 


151547: 


2s: 


3$: 
4%: 


BIS SM1,DM1 TEST - N:C = 


4 
#DWTA+10,R5 
#52525, (R2) 


(R5),(R2) 


1 


R4, (R2) 
TST550 


(R2) ,R3 


0111 


:CALL_ THE SCOPE LOOP UTILITY 
>:LOAD RO WITH TEST NUMBER 
;LOAD R1 WITH ed INSTRUCTION WORD 


:CLEAR FLAGS 
IN:C 


= 0111 
TEST THE BIS 
C = 1001? 


BIS FAILED TO ALTER CODES PROPER: ¥ 
: CORRECT RESULT ? 
IF YES 


GET THE WAS DATA 
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CQKDA-E_KD17=K BASIC LOGIC TE 
CQKDAE .P 11 17=SEP=79 09:47 1547 BIS SM1,DM1 TEST = N:C = 011 SEG 0199 
Mh 037116 104001 5$: ERROR 1 BIS DELIVERED THE WRONG RESULT 
10779 LEAR REAR EEE REE EEEEREERR ORE EREREEE EERE EEE ED 
10780 S*TEST 550 BIS SM1,9M1 TEST = N:C = 1000 

10781 1 RRR RRR AREER ERRORS TR EREE RARER EERE RRR REE RRR RE EEE EES 
10782 037120 TS$T550: 

10783 037120 000004 SCOPE _ THE SCOPE LOOP UTILITY 

10784 037122 012700 000550 MOV #559 ,R0 OAD RO WITH TEST NUMBER 

10785 037126 013701 037152 MOV a4 2$,R1 {OAD R1 WITH TEST INSTRUCTION WORD 
10786 037132 012702 063316 MOV AMBUF 0 ,R2 :DEST ADDR = MBUFO 

10787 037736 005004 CLR R4 ;RESULT S$ / B = 000000 

10788 037140 012705 063326 MOV #DWTA,RS SOURCE ADDR = DWTA 

10789 037144 005012 CLR (R2) ;CDESTJ = 000000 

10790 037146 000257 ccc -CLEAR FLAGS 

\Ovee 037150 000270 SEN iN:C = 1000 

tac, 037152 051512 2s: BIS (R5),(R2) sTEST THE BIS 

10795 037154 100403 8M! 3$ iN:C = 0100 ? 

10796 037156 001002 BNE 3$ 

10797 037160 102401 BVS 3$ 

pets 037162 103001 BCC 4$ 

bss 037164 104001 3$: ERROR 1 :BIS FAILED TO ALTER CODES PROPERLY 
10802 037166 020412 43: CMP R4, (R2) ; CORRECT RESULT ? 

sag 037170 001402 BEQ TST551 ;:BR IF YES 

10805 037172 011203 MOV (R2) ,R3 GET THE WAS DATA 

ioe 037174 104001 5$: ERROR 1 ;BIS DELIVERED THE WRONG RESULT 
10808 CDI II III IOIOIIIUIIOIOIOIUIDIOIUIOIOIIUIOIDOIUIUIIIOIUIIOOIUUII OI ott ttt tt tt 
10809 s*TEST 551 BIC SM1,DM? TEST = N:C = 0111 

10810 DDI TR ITT TTR IC TO IEEE ERR ERE EERE EERE Ee 
10811 037176 TST551: 

10812 037176 000004 SCOPE 7 CALL THE SCOPE LOOP UTILITY 

10813 037200 012700 000551 MOV #551,RO LOAD FO wITH TEST NUMBER 

10814 037204 013701 037240 MOV pa R1 LOAD R1 WITH TEST INSTRUCTION WORD 
10815 037210 012702 063316 MOV UFO ,R2 :DEST ADDR = MBUFO 

10816 037214 012704 100000 MOV #100006, R4 sRESULT S / B = 100000 

10817 037220 012705 063322 MOV AMBUF 1 ,R5 SOURCE ADDR_= MBUF 1 

10818 037224 612715 077777 MOV WITT. (R5) ;CSOURCE] =_77777 

10819 037230 012712 177777 MOV #-1,(R2) sCDEST] = 177777 

10820 037234 000257 ccc oe FLAGS 

H+ 5 3 037236 000267 267 = 0111 

rans? 037240 041512 2$: BIC (R5),(R2) 3 TEST THE BIC 

10825 077242 100003 BPL 3$ 3N:C = 1091 ? 

10826 037244 001402 BEQ 3$ 

10827 037246 102401 Bys 3$ 

once 037250 103401 BCS 4$ 

at 037252 104001 3$: ERROR 1 BIC FAILED TO ALTER CODES PROPER. 


10832 037254 020412 4%: CMP RS, (R2) s CORRECT RESULT ? 
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037406 


037416 
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011203 
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011203 
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900552 


000553 


1551 


5$: 


MACY11 vee Fe 


BEQ 


MOV 
ERROR 


16 I 
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DM1 TEST = N:C 


TST552 
(RZ) AS 


= 0111 SEG 0200 
;7;BR IF YES 


GET THE WAS DATA 
;BIC DELIVERED THE WRONG RESULT 


SORE EERE ERA RARER EERE HERKREHERHEAERERHHEHKRHEEREEE 


S*TEST 552 


SORE REE ERE ERREKRERREERATRAERERRRERERERREEE 


1$1552: 


S$: 


MOV 
ERROR 


BIC SM1,DM1 TEST = N:C = 


1 


R4,(R2) 
TST553 


ne? Me 


1000 


:CALL_THE SCOPE LOOP UTILITY 
;;LGAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
DEST ADDR = MBUFO 


S 
“EDESTI = 000000 
; CLEAR FLAGS 
=N:C = 1000 
: TEST THE BIC 


= 0100 ? 


;BIC FAILED TO ALTER CODES PROPERLY 
CORRECT RESULT ? 
;;BR IF YES 


GET THE WAS DATA 
;BIC DELIVERED THE WRONG RESULT 


SRR RAE REE EEE EEE KKAKHKKKEEE 


SeTEST 553 


EAA eee RRR RRR RRR RR RRR RRRRRRR SERRE RRR RRR RRR RSS RRR R RRS RRS RRR RSS SS 


151553: 


2s: 


BIT SM1,DM1 TEST - N:C = 


952525, (R5) 
#125252, (R2) 


(R5),(R2) 


1000 


:CALL_ THE SCOPE LOOP UTILITY 
;;LOAD RO WITH TEST NUMBER 
;LOAD R1 + gage INSTRUCTION WORD 


; CLEAR FLAGS 


iN:C = 1000 
;TEST THE BIT 
= 9100 ? 
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104001 


020412 
001402 


911203 
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000004 
012700 
013701 


032737 
001401 
000000 


021512 
100603 
001402 
102401 
103401 
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001402 
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037506 


004000 


067316 
100000 


063322 
100000 
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7553 BIT SM1,DM1 TEST = N:C = 1000 
3$: ERROR 1 ;BIT FAILED TG ALTER CODES PROPERLY 
4$: CMP R4,(R2) sCORRECT RESULT ? 

BEQ TS7554 7 7BR IF YES 

MOV (R2) ,R3 ;GET THE WAS DATA 
S$: ERROR 1 ;BIT DELIVERED A RESULT 
CL RAAARARAAAEAAAAARARARRARARAAARRAARRARAAARRRRARARAAERERRAKARERERRREH 
seTEST 554 BIT SM1,DM1 TEST = N:C = 0111 


FFARR AAERAREAARAREARAARARAARRRERRAERRARAAERRARARREREARRERRAHERE DE 
151554: 

SCOPE :CALL_THE SCOPE LOOP UTILITY 

MOV -#554.R0 >;LOAD RO WITH TEST NUMBER 

MOV a72$,R :LOAD R1 WITH TEST INSTRUCTION WORD 
-SBTTL USER CONTROLLED BREAKPOINT <~ BiTT? 

BIT #61111 Q#GPTLOC :BREAKPOINT HALT SET 7? 


BEQ +4 ;BR IF 

HALT ; BREAK~DEPRESS CONTINUE TO CONTINUE 
MOV A#MBUFO ,R2 ;DEST ADDR pra’ FO 

MOV #100000 ,R4 SRESULT- S$ / B = oe 

MOV AMBUF 1 RS : SOURCE ADDR = MBUF 1 


MOV #100000, (RS) ; CSOURCEJ = 100000 
MOV #100000, (R2) ;CDESTJ = 100000 


Ett i CLEAR FLAGS 

267 iN:C = 0111 
eS: BIT (R5),(R2) : TEST THE BIT 

BP! 3$ suz€ = 1001. ? 

BEQ 3$ 

BVS 3$ 

BCS 4$ 
3$: ERROR 1 BIT FAILED TO ALTER CODES PROPERLY 
4$: CMP RG, (R2) : CORRECT RESULT ? 

BEQ TST555 ;;BR IF YES 

MOV (R2),R3 ~ ;GET THE WAS DATA 
5$: =RROR 1 :BIT DELIVERED A RESULT 
SLA A RAE AERAERAKERAERERAERAAAKERENTAEREREARAERARAEER ED 
i*TEST 555 CMP SM1,DM1 TEST - N:C = 1010 
CE RARER AAERAEARERARAEKRRAARRRARERARERERARAEAHRARAEAAAEAERRARAREAA HD 
TST555: 

SCOPE = CALL THE SCOPE LOOP UTILITY 

MOV #555,R0 ;LOAD RO WITH TEST NUMBER 

MOV aF2$,R1 = LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 “DEST ADDR = MBUFO 

MOV H-1 RG RESULT S / B = 177777 

MOV #MBUF TLRS ;SOURCE ADDR = MBUF1 

MOV #-1,(R5) :(SOURCE] = 177777 

MOV R4,(R2) :CDESTJ = 177777 


CCC ;CLEAR FLAGS 





SEQ 0201 
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037570 
037572 
037574 
037576 
037600 
037602 
037604 


037606 
037610 


037612 
037614 


037654 
037656 


037670 


037672 
037674 


037676 
037700 


037702 


037720 


1PeeEB= 99 
000272 
021512 
100403 
001002 
102601 
103001 
104001 


020412 
001402 


011203 
104001 


921512 


100003 
001402 
102401 
103401 


104001 


020412 
001402 


011203 
104001 


000001 
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T7555 1,DM1 TEST = N:C = 1010 

are iN:C = 1010 
23: CMP (R5),(R2) ;TEST THE CMP 

BMI 3$ iN:C = 0100 ? 

BNE 3$ 

BVS 3$ 

BCC 4 
3% ERROR 1 ;CMP FAILED TO ALTER CODES PROPERLY 
4$: CMP RG, (R2) :CORRECT RESULT ? 

BEQ TST556 ;;BR IF YES 

MOV (R2) ,R3 GET THE WAS DATA 
58: ERROR 1 CMP DELIVERED A RESULT 
a nn 
seTEST 556 CMP SM1,DM1 TEST - N:C = 0110 


5 RAR RARER RAR KEE ERAEEARRAEAKEARRAARRKERAEAEKREKERAREEE ARH 


7S1556: 


SCOPE = CALL THE SCOPE LOOP UTILITY 
MOV #556,R0 LOAD RO WITH TEST NUMBER 
MOV a2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 :DEST ADDR = MBUFO 
MOV #+7 RG RESULT S / B = 000001 
MOV AMBUF1,RS zg CE ADDR = MBUF1 
CLR (R5) SOURCE] = 000000 
MOV #+1,(R2) ;LDESTJ = 00000 
CEL te FLAGS 
266 0110 
2$: CMP (R5),(R2) TEST THE CMP 
BPL 3$ 3N:C = 1001 ? 
BEG 3$ 
BVS 3$ 
BCS 4$ 
3$: ERROR 1 CMP FAILED TO ALTER CODES PROPERLY 
43: CMP R4,(R2) : CORRECT RESULT ? 
BEQ TSTS57 77BR IF YES 
MOV (R2) ,R3 ;GET THE WAS DATA 
5$: ERROR 1 ;CMP DELIVERED A RESULT 
SPARTA AAA REAR AERA AAARARHEARERERAATKKRAARAEKEAHHRRERHERRe Rees es 
s*TEST 557 CMP SM1,DM1 TEST = N:C = 90C0 
CAAT AAARAAAAERARAAAERAARRARARAARAERAEKARRERAAAEORAAERREARE RHR? tnt aunt 
TST557: 
SCOPE 7 CALL THE SCOPE [om UTILITY 
MOV #557,R0 ;LOAD RO WITH TEST NUMBER 
MOV OF2$,R1 * LOAD R1 wiTH TEST INSTRUCTION WORD 
MOV #MBUFO,R2  SDEST ADDR = MBUFO 


MOV #+1,R4 sRESULT S / B = 000001 


SEQ 0202 


I 16 
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CQKDA-E KD11=K BASIC Loert TESTS MACY 
CQKDAE .P11 17=SEP=79 09:47 7557 CMP SM1,DM1 TEST = N:C = 0000 SEQ 0203 
11001 037724 012705 063322 MOV #MBUFT RS 7SOURCE ADDR = MBUF I 
11002 037730 Q12715 100000 MOV 70006 RS) ;CSOURCE] = 000000 

11003 037734 012712 000007 MOV #+1,(R2) :CDESTJ = 000001 

Bee 937740 000257 ccc ;CLEAR FLAGS 

1100? 037742 021512 2$: CMP (R5),(R2) 3TEST THE CMP 

11008 037744 100403 BM! 3$ 3N:C = 0010 ? 

11009 037746 001402 BEQ 3$ 

11010 037750 102001 BvC 3$ 

Wee 037752 103001 BCC 4$ | 
sf 037754 106001 3$: ERROR 1 7CMP FAILED TO ALTER CODES PROPERLY 
11015 037756 026412 4$: CMP RG, (R2) CORRECT RESULT ? 

bay 037760 001402 BEG TST560 7:BR IF YES 

11018 037762 011203 MOV (R2) ,R3 ;GET THE WAS DATA 

Po 037764 104001 5$: ERROR 1 7CMP DELIVERED A RESULT 

11021 LRAT EERE EEE RES 
11022 s*TEST 560 BISB SM1,DMO TEST = SOURCE ADDR ODD 

11023 PLU EEE EERE EERE REAR EERE EEE ERE RE REE 
11024 037766 TST560: 

11025 037766 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

11026 037770 012700 000560 MOV #560,R0 ;;LOAD RO WITH TEST NUMBER 

11027 037774 013701 040014 MOV aF2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11028 040000 012704 000377 MOV #377 RG ;RESULT S / B = 377 

11029 040004 012705 064635 MOV #DBTA+1,R5 ;SOURCE ADDR = DBTA+1 

11030 040010 005003 CLR R3 : CBEST] = 000000 

tS 040012 000257 ccc ;SCOPE SYNC 

hs 040014 151503 2$: BISB (R5) ,R3 sTEST THE BISB 

11035 040016 020403 CMP R4,R3 sRESULT CORRECT ? 

a IneP 040020 001401 BEQ 787561 ee IF YES 

A's. 040022 1046002 3$: ERROR 2 ;BISB DELIVERED THE WRONG RESULT 
11040 DOO IIOIISIIIDIDIOIOIOIUIOIOIDIDIOIOIOIINIOIOIOIIOIUIIOIUIUIOIUIOIIOIDIDIOIDIOIIOIDIOIDICIDIOISIDIOISIDIOI IOI 
11041 S*TEST 561 BISB SM1,DM1 TEST - SOURCE ADDR ODD 

11042 COO II IOIIUIISIOIIOIUIIIIUIOIIUIIOIIOIUIIDIIUIOIUIUIOIUIOIIOIO IOUT Rin tok ttt 
11043 040024 TST561: 

11044 040024 000004 SCOPE ;CALL THE SCOPE Lo UTILITY 

11045 040026 012700 000561 MOV #561,R0 ;;LOAD RO WITH TEST NUMBER 

11046 040032 013701 040056 MOV a#2$,R1 > LOAD R1 WITH TEST INSTRUCTION WORD 
11047 040036 012702 063316 MOV AMBUFO,R2 DEST a wy ao 

11048 040042 012704 000377 MOV #377 RS ;RESULT S / 377 

11049 040046 012705 064635 MOV #DBTA+1,R5 ; SOURCE E ADDR’ = = “DBTA+1 

11050 040052 005012 CLR (R2) sLPE Stes ca 

a5 040054 000257 CCC ; SCOPE 

ipod 040056 151512 2$: BISB (R5),(R2) ; TEST THE BISA 

11055 040060 020412 CMP R4,(R2) ;CORRECT RESULT 

11056 040062 001402 BEQ TSTS62 37BR IF YES 
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11057 
11058 


SESS PESESS 


OOOCOCOOCC0CO 
INN NN NNWN WN 
ONAVISWN—O”O 


SBEES 


— os a a od a a Ss oe st 8 os os oS os et 3 ot oh ot ot oh oh ot Hh th ot 1 SS th so I ot 
SSSSSSSSSSSSREEE 
DWNAUEWN—OVDONAW 


mk sd a ss sh ot os a ot oh th I ot tt ot oh ot ot SH 2h ot ot wh os St 
S&S OERWwWR— 


ed et od oJ od I et ee 


—— 2 = 
—_— 
moO 





me 
tall 
2 


17S 


151523 


020412 
001402 


011203 
104001 


151533 


020412 
001402 


011203 
104001 


01 
013701 
01 


000563 


J 16 
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1561 BISB SM1,DM1 TEST = SOURCE ADDR ODD 


MOV (R2) ,R3 ;GET THE WAS DATA 
3$: ERROR 1 ;BISB DELIVERED THE WRONG RESULT 
LURE ERE RE REE EEE EET EERE REE ERRE EERE 
i*TEST 562 BISB SM1,DM2 TEST = SOURCE ADDR ODD 


5 GR AAAARARAARAAARAAARAAARAAERERAAAAARAAERARKRARAERARREARTRERERRREERA ED 


1S1562: 
Sc 


OPE = CALL THE SCOPE LOOP UTILITY 
MOV #562,R0 ZLOAD RO WITH TEST NUMBER 
MOV a¥2$,R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
MOV AMBUF O,R2 DEST ADDR = MBUFO 
MOV #377 RS ;RESULT S / B = 377 
MOV #DBTA+1,R5 ;SOURCE ADDR = DBTA+1 
CLR (R2) ;CDESTJ = 000000 
MOV R2,R3 :DEST ADDR IN R53 
CCC ;SCOPE SYNC 
2$: BISB (R5),(R3)+ ; TEST THE BISB 
CMP R4,(R2) : CORRECT RESULT 
BEQ TSTS563 7;BR IF YES 
MOV (R2) ,R3 ;GET THE WAS DATA 
3$: ERROR 1 ;BISB DELIVERED THE WRONG RESULT 
LDR ERR ERE REE RRA REE REE REE REE REE ERR REE 
s*TEST 565 BISB SM1,DM3 TEST = SOURCE ADDR ODD 
CE RARE RAE REE EREAAAERAEEEERAEREAEEEEERHEE EH 
TST563: ’ 
SCOPE ;CALL THE SCOPE ee UTILITY 
MOV #563,R0 >; LOAD RO WITH TEST NUMBER 
MOV a2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV AMBUFO,R2 ;DEST ADDR = MBUFO 
MOV #377 ,R4S :RESULT $/6:2 3/7? 
MOV #DBTA+1,R5 2S E ADDR = DBTA+1 
CLR (R2) ;CDESTJ = 000000 
MOV #4TA+10,R3 BAS E DEST ADDR = ATA+10 
ccc :SCOPE SYNC 
es: BISB (R5) ,a(R3)+ ; TEST THE BISB 
‘ CMP R4,(R2) ; CORRECT RESULT 
BEQ TST564 ;;BR IF YES 
MOV (R2) ,R3 ;GET THE WAS DATA 
3$: ERROR 1 :BISB DELIVERED THE WRONG RESULT 
UPAR RRARRESSSR RSS SRR RRS RRR RRS RS RRS SRR SARS RSS RR RR RRR SSS SRS SS 
Se TEST 564 BISB SM1,DM4 TEST = SOURCE ADDR ODD 
° -wbbeheeeeesecceeeeceeseseeeeeseeeeeesasescosesnenenesesenesesese 
151564: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #564,R0 +; LOAD RO WITH TEST NUMBER 
MOV a42$,81 ;LOAD R1 WITH TEST INSTRUCTION WORD 


MOV #MBUF 0,2 DEST ADDR = MBUFO 


SEQ 0204 © 


CQKDAE_KD11-K BASIC LOGIC TESTS 
17=SEP=79 


COKDAE P11 
11113 040224 
11116 0402 
11115 040234 
11118 040240 
11117 040262 
11118 
11119 060244 
11120 
11121 040246 
11122 040250 
11128 
11124 940252 
11125 040254 
11126 
11127 
11128 
11129 
11130 040256 
11131 040256 
11132 0402 
11133 040266 
11134 040270 
11135 040274 
11136 040 
11137 040304 
11138 040310 
11139 040312 
11140 
11141 040314 
11142 
11143 040316 
11144 040320 
11145 
11146 040322 
11147 040324 
11148 
11149 
11150 
11151 
11152 040326 
11153 040326 
11154 03 
11155 040334 
11156 040340 
11157 04034 
11158 040350 
11159 040354 
11160 040 
11161 040362 
11162 
11163 040364 
11164 
11165 040370 
11166 040372 
11167 
11168 040374 


151543 


020412 
001402 


011203 
104001 


151553 


020412 
001402 


011203 
104001 


151563 


020412 
001402 


011203 


09:47 


000565 


177772 


K 16 
MACY?1 30A(1052) 17=SEP=79 09:55 PAGE 206 
1564 BISB SM1,DM4 TEST = SOURCE ADDR ODD 


MOV #177400,R4G 
MOV ADRBTA+1,R5 


28: BISB (RS), = (R3) 


CMP R4,(R2) 
BEQ TST565 


MOV (R2) ,R3 
3$: ERROR 1 


MOV #MBUF0+2,R3 
(Re) 


SEQ 0205 
RESULT S / B = 177400 


;(DESTJ = 000000 


;TEST THE BISB 
;CCRRECT RESULT 
IF YES 


:GET THE WAS DATA 
;BISB DELIVERED THE WRONG RESULT 


SS RRR EARAREREAAAAAAEEAEEKAKEKRAREEAAAARAEEAAERAREAAEEREERERERRN EEE 


TeTEST 565 


BISB SM1,DMS TEST = SOURCE ADDR ODD 


RRA AAERAEAEREEE EEE AKRAERAREAKEEAEAEKEEKEEKEKEKEKE EE 


TST565: 
SCOPE 
Vv #565,R0 
MOV a#2$,R1 
MOV AMBUFO,R2 
MOV #377 RS 
MOV #DBTA+1,R5 
MOV MATA+12,R3 
CLR (R2) 
CCC 
2$: BISB (R5) ,a-(R3) 
CMP R4, (R2) 
BEQ TST566 
MOV (R2) ,R3 
3$: ERROR 1 


CALL _THE SCOPE LOOP UTILITY 

;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 

RESULT S / B = 377 

; SOURCE ADDR = DBTA+1 

BASE DEST ADDR = ATA+12 

;CDESTJ = 000000 

SCOPE SYNC 


; TEST THE BISB 
CORRECT RESULT 
;;BR IF YES 


GET THE WAS DATA 
;BISB DELIVERED THE WRONG RESULT 


Wwe See Re RR RER EERE RR EEE ARRRRRRRRRSASASRRL ARRAS ERASER SERRA SSR SS ES S| 


S*TEST 566 BISB SM1,DM6 TEST = SOURCE ADDR ODD 


SL ERR REE RR ERE RK ERE REE REE ERR ERE ERE REE RED 


1S1566: 


2R4 
MOV #DBTA+1,R5 
MOV AMBUF 0+6,R3 
(Re) 


e$: B1SB (R5) ,-6(R3) 


CMP R4, (R2) 
BEQ TST567 


MOV (R2) ,R3 


:CALL_THE SCOPE LOOP UTILITY 
:;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
DEST ADDR = MBUFO 

RESULT S / B = 377 

;SOURCE ADDR = DBTA+1 

;BASE DEST ADDR = MBUFO+6 

:CDESTJ = 000000 

SCOPE SYNC 


; TEST THE BISB 
; CORRECT RESULT 
2 IF YES 


GET THE WAS DATA 


L 16 
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CQKDAE .P11 17=SEP=79 09:47 1566 BISB SM1,DM6 TEST - SOURCE ADDR ODD _ ~SEG 0206 
Te ata ci 3$: ERROR 1 ;BISB DELIVERED THE WRONG RESULT 
111771 LEE RETR ERREERRERREE REE E EERE REE EERE REE 
11172 s*TEST 567 BISB SM1,DM7 TEST = SOURCE ADDR ODD 
11173 CII IOI IIIIIIIEIIIOIOIIIIOIUIIIOIIUIOIIOIUIOIIUIOIOIOIOIOIUIOIOIUIOIOIOTOOTT ITT tt Re 
11174 040400 TST56?: 

11175 0404600 000004 SCOPE ny THE SCOPE LOOP UTILITY 

11176 040402 012700 000567 MOV #567 ,RO OAD RO WITH TEST NUMBER 

11177 040406 013701 040436 MOV av2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
11178 040412 012702 063316 MOV AMBUF 0 ,R2 :DEST ADDR = MBUFO 

11179 040416 012704 000377 MOV #377 ,R4 sRESULT S / B = 377 

11180 040422 012705 064635 MOV ADBTA+1,R5 SOURCE ADDR = DBTA+1 

11181 040426 012703 063302 MOV #ATA,R3 ;BASE DEST ADDR = ATA 

11182 040432 005012 CLR (R2) :CDESTJ = 000000 

IB + 040434 000257 CCC :SCOPE SYNC 

aves 040436 151573 000010 2$: BISB (R5) ,a10(R3) ;TEST THE BISB 
11187 040442 020412 CMP R4, (Re) ; CORRECT RESULT 
BY 040444 001402 BEQ TST570 7;BR IF YES 
11190 040446 011203 MOV (R2) ,R3 ;GET THE WAS DATA 
ioe 040450 104001 3$: ERROR 1 ;BISB DELIVERED THE WRONG RESULT 
11193 DOI III IDI IOIIISIUIIIOIIOIDI IIIS IOIIOIISIOISIOIOIOIIOIIUIOIOIIOIIOIOIOIIDIOI 
11194 i*TEST 570 BISB SMO,DM2 TEST - DEST ADDR EVEN 
11195 CII ISIICIIIIIIIIDIOIIIUIOIIOIIOIUIDIIOIOIUIOIOIUIOIIOIUIDOIIOIIOIIUIIUIIUIIOIUID I it 
11196 040452 TST570: 

11197 040452 000004 SCOPE :CALL_THE SCOPE LOOP UTILITY 
11198 040454 012700 000570 MOV #570,R0 7;LOAD RO WITH TEST NUMBER 

11199 040460 013701 040502 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11200 012702 063316 MOV A#MBUFO.R2 DEST ADDR = FO 

11201 0460470 012704 000377 MOV #377 ,R4 RESULT S / B = 377 

11202 040474 010203 MOV Re, :DEST ADDR IN 

11203 040476 005012 CLR {R :CDESTJ = 000000 

iso 040500 000257 ccc :SCOPE SYNC 

11908 040502 150425 2s: B1SB R4,(R3)+ : TEST THE BISB 

11208 040504 020412 CMP R4, (R2) CORRECT RESULT 

aE + 040506 001402 BEQ TST571 32BR IF YES 

11211 040510 011203 MOV (R2) ,R3 GET THE WAS DATA 

Visl¢ 040512 104001 3$: ERROR 1 ;BISB DELIVERED THE WRONG RESULT 
11214 j DDO III IOIIIIIIIDIDIIOOIOIOIIIIOIDIOUIOIOIUIIOIDIUIIUIUIOIOIOIUIIOIUIOUIOIIOI IOI ot tt 
11215 ;*TEST 571 BISB SMO,DM1 TEST - DEST ADDR ODD 

11216 SRE REE EE ERR EERE ARERR ERE RR EEE EEE EER 
11217 040514 181571: 

11218 040514 000004 SCOPE —_ THE nt te LOOP UTILITY 
11219 040516 012700 000571 MOV #571 ,RO OAD RO WITH TEST NUMBER 

11220 040522 013701 040552 MOV a#2$,R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
11221 040526 012702 063316 MOV FO,R2 :DEST ADDR = 

11222 040532 012704 177400 MOV #177400,R4 sRESULT S / B = 177400 

11223 0405 012705 MOV #377,R ;CRSJ=SOURCE OPR = 377 

11224 040542 012703 063317 MOV #MBUF 0+1 ,R3 [ODD DEST ADDR IN R3 





CQKDA=E_KD11-K BASIC LOGIC TE 
CQKDAE .P11 17-SEP-79 09:47 


11225 040546 005012 
11226 040550 000257 


040552 150513 


040554 020412 
040556 001402 


040560 911203 
040562 104001 


STS 


Mn 
on 


MOMMA ES EER RR REE EWWAAINAAS 


MMVI 


233 

RR 
aes 

aon 


ie 
® 
& 
RS 
SS 
s3 


000573 
4 


04066 
64 040640 012702 063316 
265 040644 012704 177400 


66 064635 
267 Reneee 012703 063317 


MONMNPORS NININDNNNNYNINNN NNN NN NnonononoMppopofnnonofl—nynrnrnrnrvnr 


71 040664 151513 


73 040666 020412 
274 040670 001402 


276 040672 011203 
104001 


M 16 
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1571 BISB SMO,DM1 TEST = DEST ADDR ODD EQ 


CLR (R2) :(DEST] = 000000 
CCC SSCOPE SYNC 
2$: BISB —R5,, (R3) :TEST THE BISB 
CMP RG, (R2) : CORRECT RESULT 
BEQ TST572 36 IF YES 
MOV (R2) ,R3 :GET THE WAS DATA 
3$: ERROR 1 ‘BISB DELIVERED THE WRONG RESULT 


WeeS eee RARER RERERALESARARERLARASAAESEA RRR EASA ESR S RRR R RSS DS 


SeTEST 572 BISB SMO,DM1 TEST = DEST ADDR EVEN 


Went eee eee eRe AREEEESEEAARASSEERASASALSEALESASS SESE SSSR ESR S ESS SS 


1$1572: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #572,R0 *;LOAD RO WITH TEST NUMBER 
MOV a#2$.R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUF 0,R2 “DEST ADDR = MBUFO 
MOV #377,RG “RESULT S / B = 377 
MOV R2,R3 ‘DEST ADDR IN R 
CLR (R2) :CDEST] = 000000 
CCC [SCOPE SYNC 
2$: BISB —R4, (R3) :TEST THE BISB 
CMP R4, (R2) : CORRECT RESULT 
BEQ TST573 ;:;BR IF YES 
MOV (R2) .R3 :GET THE WAS DATA 
3s: ERROR 1 ‘BISB DELIVERED THE WRONG RESULT 


SRE ARARE REE KKK KEERKEKRKEEEEEKEREKEKEKEAEEREREKEEEEEERAEEEEEKEEEEE 


T*TEST 573 BISB SM1,DM1 TEST - DEST ADDR ODD 


WenA ARPA RRRRRELASALASERASSLES ARERR R LASER E SES ARERR RRR SSR RSS RRS ES | 


TST573: 
SCOPE ;CALL_THE SCOPE LOOP UTILITY 
MOV #573,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV AMBUF 0 ,R2 DEST ADDR = MBUFO 
MOV #177400,R4 RESULT S / B = 177400 
MOV #DBTA+1,R5 ;SOURCE ADDR = DBTA+1 
MOV AMBUF 0+1 ,R3 ODD DEST ADDR IN R3 
CLR (R2) :CDESTJ = 000000 
CCC ; SCOPE SYNC 
2$: BISB (R5),(R3) TEST THE BISB 
CMP RS, (R2) ; CORRECT RESULT 
BEQ TST574 ;3BR IF YES 
MOV (R2) ,R3 GET THE WAS DATA 
3$: ERROR 1 ;BISB DELIVERED THE WRONG RESULT 


WEA eRe RRSRERRRRRESES RRR RRRRE RRR ERR SRR R RSA RAR RARER RR RRR ERR RRS SS SO | 


SeTEST 574 JMP MODE 1 TEST, FLAGS = 1111 


CQKDA-E KD11-K BAS 


ee 
IC TESTS MACY11 30A(1052) 17-SEP-79 09: 7% PAGE 209 
CQKDAE .P11 17=SEP=79 09:47 1574 


JMP MODE 1 TEST, FLAGS = 11 SEQ 0208 
11281 LRA AA EAR ERATE AER RARER EEREREEREEERERRERRR NERA REE 
11282 040676 TST574: 
11283 040676 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
11284 040700 012700 000574 MOV #574 ,R0 ;;LOAD RO WITH TEST NUMBER 
11285 0407046 913701 040716 MOV a72$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11286 040710 012702 040724 MOV #4$,R2 R2 CONTAINS JUMP ADDRESS 
Es 040714 000277 Scc 7MAKE N:C = 1111 
\1Se9 040716 000112 es: JMP (R2) ;TEST THE JMP - GO TO 4$ 
11291 040720 104006 3$: ERROR 6 ;JMP FAILED TO LOAD PC 
11596 040722 000405 BR TST575 3:GO CALL SCOPE 
11294 040724 103003 4$: BCC 5$ ;BR IF JMP CLEARED ‘'C’ 
11295 040726 102002 BVC 5$ ;BR IF JMP CLEARED ‘V"' 
11296 040730 001001 BNE 5$ ;BR IF JMP CLEARED ‘'‘7"' 
Sen 040732 100401 BM! TST575 77BR IF ‘NWN’ STILL SET 
io 040734 104006 a ; 5$: ERROR 6 ;JMP ALTERED CODES - CLEARED ONE 
11301 SERRE ERE REE E REE RERREEEEREKEE RENEE 
11302 i*TEST 575 JMP MODE 1 TEST, FLAGS = 0000 
11303 LLU RRR RRR ER REE EER EERE REAR EERE EERE REE Ee 
11304 040736 TST575: 
11305 040736 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
11306 040740 012700 000575 MOV #575,R0 LOAD RO WITH TEST NUMBER 
11307 040744 013701 040756 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11308 040750 012702 040764 MOV #4$,R2 R2 CONTAINS JMP ADDRESS 
he 040754 000257 ccc SMAKE N:C = 0000 
ih 040756 000112 2$: JMP (R2) :TEST THE JMP - GO TO 4$ 
11313 040760 104006 3$: ERROR 6 ;JMP FAILED TO LOAD PC 
tee 040762 000405 BR TST576 3:GO0 CALL SCOPE 
11316 040764 103403 4$: BCS 5$ ;BR IF JMP SET ‘'C’’ 
11317 040766 102402 BVS 5$ 7BR IF JMP SET ‘V"" 
11318 040770 001401 BEQ 5$ - IF JMP SET *'2"" 
HAF 2h 4 040772 100001 BPL TST576 7BR IF ‘N’* STILL CLEAR 
11355 040774 104006 5$: ERROR 6 7 JMP ALTERED CODES - SET ONE 
11323 LL EERE EERE EERE REE EE EER RRR ne ht 
11324 i*TEST 576 JMP MODE 2 TEST; FLAGS = 1111 
11325 CDI IOI IIIOIOIIOIIIOIIUIOIIIDIIUIIOIIIIUIIUIIOIIOIIIIIU TUTOR RRR ttt 
11326 040776 TST576: 
11327 040776 000004 SCOPE = CALL THE SCOPE LOOP UTILITY 
11328 041000 012700 000576 MOV #576,RO0 ;LOAD RO WITH TEST NUMBER 
11329 013701 041016 MOV a#2$,R1 “{ OAD R1 WITH TEST INSTRUCTION WORD 
11330 041010 012702 041024 MOV #4$,R2 7R2 CONTAINS ts ADDRESS 
qe 041014 000277 scc 3SET N:C = 111 
ite 041016 000722 2$: JMP (R2)+ ;TEST THE JMP - GO TO 4$ 
11335 041020 104006 3$: ERROR 6 ; IMP pA ee TO Loe PC 
11336 041022 000411 BR TSTS77 32G0 TO SCOPE EXIT 


a 
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CQKDAE .P11 17=SEP=79 09:47 1576 JMP MODE 2 TEST; FLAGS = 11117 


4$: ;BR IF JMP CLEARED ‘'C"’ 
;BR IF JMP CLEARED ‘V°" 
;BR IF JMP CLEARED ‘7°’ 
7BR IF ‘N’’ STILL SET 


S$: ;JMP ALTERED CODES - CLEARED 


022702 6$: #4$+2,R2 :DID R2 GET AUTO=INCREMENTED? 
001401 TST57? ::BR IF YES 


104006 7$: ;JMP FAILED TO UPDATE REGISTER (R2) 


WEARS AARESRARRERRRASARRRRERRRESASRSARERSASERRER RSE EARS RS REE SSE SE SS | 


tSTEST 577 JMP MODE 2 TEST; FLAGS = 0000 


SERRE REE AAAAAEEAEARERERARAKEEAREREREEREERARE ED 


1$1577: 


wae 
OY 


EEFEEEL ERE 


UEWN 0 OWNAUEWHN-O 


AINA 


CALL THE SCOPE LOOP UTILITY 
;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;R2 CONTAINS JUMP ADDRESS 

MAKE N:C = 0000 


; TEST THE JMP - GO TO 4$ 


;JMP FAILED TO LOAD PC 
3:GO TO SCOPE EXIT 


103403 : BR IF JMP SET *‘C’' 

102402 ;BR IF JMP SET ‘V"' 
;BR IF JMP SET ‘2°’ 
3:BR IF ‘N'' IS CLEAR 


5$: 7:JMP ALTERED CODES - SET 


SERRE RRA EERE ERRATA ERE 


=*TEST 600 JMP TEST MODE 3; FLAGS = 1111 


SEERA RAKAERARARA KEARSE KEKE 


151600: 


BRARARARAD 


SESSRESESAAG 


& 


UWEWNH ODO 


;CALL_ THE SCOPE LOOP UTILITY 

#600 RO ;;LOAD RO WITH TEST NUMBER 
;LOAD R1 WITH TEST INSTRUCTION WORD 
:R2 CONTAINS ADDRESS OF JUMP ADDRESS 
;SET N:C = 1117 


a(R2)+ ; TEST THE JMP - GO TO 4$ 


6 ;JMP FAILED TO LOAD PC 
TST601 ;:GO TO SCOPE EXIT 


;BR IF JMP CLEARED ‘'C’’ 
;BR IF JMP CLEARED ‘V°' 
;BR IF JMP CLEARED *'2"' 
;BR IF ‘N’' STILL SET 


;JMP ALTERED CODES = CLEAR 


NINN NN NNNWN 


WWWNWWNWNWWAWAWW 
ONO 


SSRERESESS 


& 
ye) 
NSSF VS 


11 
1 
1 
11 
11 
11 
11 
11 
11 
11 
1 
11 
14 
11 
11 
11 
1 
11 
11 
11 
11 
1 
11 
11 
1 
1 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 
1 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 
11 


wv“ 
S<s 
® 
—y 
ot 
> 
n 
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COKDAE .P11 17=SEP=79 09:47 T600 JMP TEST MODE 3; FLAGS = 1111 SEQ 0210 
11393 

11394 061146 022702 041162 63: CMP #7$+2,R2 DID JMP UPDATE R27 

11396 041152 001404 BEQ TST601 :<BR IF YES 

11397 061154 104006 ERROR 6 7vMP FAILED TO UPDATE REGISTER 






Pa ec 


E 
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111 SEQ 0211 


CQKDAE .P 11 “17-SEP-79 09:47 T600 JMP TEST MODE 3; FLAGS = 








1398 041156 000402 BR TST601 # +60 TO SCOPE EXIT 

1399 041160 041134 7$: 4$ JMP3 CONTAINS JUMP ADDR 

1400 041162 104006 ERROR 6 [ERROR CALL OCCURS 4 MODE 3 HAPPENS 
1401 ;TO EXECUTE AS MODE 1 OR 2 AND 

1402 74$ IS LEGAL INSTRUCTION 







1404 DOGS IUIISIOIIIIIIIOIIUISIIOUIOIISIOIOIUIUIOIIIUIIUIUIUIOIUIUINIIUIDI IR IIR ft hi tt 


1405 3*TEST 601 JMP TEST MODE 3; FLAGS = 0000 


1406 LRA REE ERR Re 











1407 041164 1$1601: 
1408 041164 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
1409 041166 012700 000601 MOV #601.R0 LOAD RO WITH TEST NUMBER 
1410 041172 013701 041204 MOV,  a#2$.R1 {iGAD R1 WITH TEST INSTRUCTION WORD 
1411 061176 012702 041226 MOV #6$ RZ “R2 CONTAINS ADDRESS OF JUMP ADDRESS 
1eig 041202 CCC “MAKE N:C = 0000 
1414 061204 000132 2$: IME a(R2)+ :TEST THE JMP = GO TO 4$ 
1416 041206 104006 3S: ERROR 6 :JMP FAILED TO LOAD THE PC 
1417 041210 000410 BR TST602 *:GO TO SCOPE EXIT 
1419 061212 103403 4$: BCS 5$ :BR IF JMP SET ‘'C’ 
1 021314 102402 BVS 5$ “BR IF JMP SET 'V"" 
041216 001401 BEQ 5$ :BR IF IMP, SET "7°" 
041220 BPL TST602 “SBR IF 'N' STILL CLEAR 
041222 104006 S$: ERROR 6 :JMP ALTERED CODES - SET 
041224 000402 BR TST602 G0 TO SCOPE EXIT 
041226 041212 6$: 4$ : JUMP ADDRESS IN 68 
041230 104006 ERROR 6 MP MODE 3 EXECUTED LIKE MODE 1 OR 2 






SARA EEERREEERERERREREREEEEEREERERREEEEEERREREEEH ED 


S*TEST 602 JMP TEST MODE 4; FLAGS = 1111 


SERRE EERE REE RR EE RR EREEERAEAERAREARREERKEEAERAERAEAEAEEAARAEEERKEKREKKEE 















1S1602: 

00004 SCOPE trey THE SCOPE LOOP UTILITY 
012700 000602 MOV #602,R0 ;LOAD RO WITH TEST NUMBER 
013701 041252 MOV aF2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
012702 041262 MOV #5$,R2 ;(R2] = ‘MP ADDRESS PLUS 2 
000277 scc sMAKE N:C = 1111 
000142 es: JMP -(R2) é ; TEST THE JMP - GO TO 5$ MINUS 2 

04006 3$: ERROR 6 ;JMP FAILED TO LOAD PC 
000414 BR TST603 3:G0 TO SCOPE EXIT 
000402 BR 4$ :GO TEST FLAGS - JMP LOADED P 
104 S$: ERROR 6 ; JMP FAILED TO AUTO-DECREMENT es 
000411 BR TST603 +:GO TO SCOPE EXIT 
103003 4$: BCC 7$ ;BR IF JMP CLEARED ‘'C'’ 

102002 BYC 7$ ;BR IF JMP CLEARED ‘‘V"’ 

001001 BNE 7$ - ir JMP CLEARED ‘‘7"* 







"N'’ STILL SET 





1 
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CQKDA-E KD11=-K BASIC LOGIC TE 
COKDAE .P11 17=SEP=79 09:47 T602 TEST MODE 4; FLAGS = 1111 SEQ 0212 
11454 041276 104006 7$: ERROR 6 ;JMP ALTERED FLAGS 

11456 041300 022702 041260 6$: CMP #5$-2,R2 :DID JMP UPDATE R2 PROPERLY? 
11452 041304 001401 BEQ TST608 ::;BR IF YES 

11459 041306 104006 9$: ERROR 6 :JMP FAILED TO UPDATE REGISTER 
ant CLEARER AAR RAAARREARRERERARERERRRERRRERAEREERERAEARAEREHEEEER ERR EHD 
11462 S*TEST 603 JMP TEST MODE 4: FLAGS = 0000 

11463 SD RR RE REE REAR E ERE RE RKRE 
11464 041310 TST603: 

11465 041310 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
11466 041312 012700 000603 MCV #603,RO *:LOAD RO WITH TEST NUMBER 

11467 041316 013701 041330 MOV aF2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11468 041322 012702 041340 MOV #6$+2, R2 ;CR2] = JUMP ADDRESS PLUS 2 
11469 041326 000257 CCC [MAKE N:C = 0000 

tpt 041330 000142 es: JMP -(R2) ; TEST THE JMP - TO TO 4$ 

11473 041332 104006 3$: ERROR 6 7 JMP FAILED TO LOAD PC 

11424 041334 000405 BR TST604 +:GO TO SCOPE EXIT 

11476 041336 103403 4$: BCS 5$ ;BR IF JMP SET ‘'C'' 

11477 041340 102402 BVS S$ ‘BR IF JMP SET ‘V'' 

11478 041342 001401 BEQ 5$ —_ IF JMP SET “_ 

11479 041344 100001 BPL TST604 7BR IF 'N'’ STILL CLEAR 

11481 041346 104006 5$: ERROR 6 ;JMP ALTERED CODES - SET 

11483 DUES OIE EI IES SSIES ISIE IISIIIIOSISIIIII ISIE IUEIEUOEEIE IEEE 
11484 T*TEST 606 JMP TEST MODE 5; FLAGS = 1111 

11485 DDO IIIIOIIDIDIIOIUIDIIIOIIIOIOIOIIDIDIUIOIOIOIUIIUIDIDIDIOIUIOIIDIDIUIOIOIOIOI I IOo I ioiiot tt 
11486 041350 TST604: 

11487 041350 000004 SCOPE ZCALL THE SCOPE LOOP UTILITY 
11488 041352 012700 000604 MOV #604 ,R0 tL OAD RO WITH TEST NUMBER 

11489 041356 013701 041370 MOV av2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11490 041362 012702 041424 MOV # MP5, R2 + JMP CONTAINS ADDR+2 OF JUMP ADDRESS 
11691 041366 000277 SCC 

aice 041370 000152 es: JMP a-(R2) : TEST THE JMP - GO TO 4$ 

11495 041372 104006 33: ERROR 6 :JMP FAILED TO LOAD PC 

11496 041374 000414 BR TST605 +:GO TO SCOPE OXIT 

4 

11498 041376 103003 4$: BCC 5$ :BR IF JMP CLEARED ‘'C'’ 

11499 041400 102002 BVC S$ 

11500 041402 001001 BNE S$ 

11507 041404 100401 BM] 6$ 

13508 041406 104006 5$: ERROR 6 :JMP ALTERED CODES - CLEARED 
11505 041410 022702 041422 6$: CMP #IMP5~2,R2 :DID R2 GET AUTO-DECREMENTED 
11506 041414 001404 BEQ TST605 *:BR IF YES 

11508 041416 104006 7$: ERROR 6 ;JMP FAILED TO UPDATE REGISTER 
11509 041420 000402 BR TST605 ':GO0 TO SCOPE EXIT 
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CQKDAE P11 17-SEP-79 09:47 7604 JMP TEST MODE 5; FLAGS = 1111 SEQ 0213 
11510 041422 041376 4$ ; THIS LOCATION CONTAINS JMP ADDRESS 
11a) 041424 104006 JMPS: ERROR ¢ 7; JMP EXECUTED LIKE A MODE 1 OR 2 
13218 PLU EEE ERE ERE REE REE ERE EERE ee 
11514 ;*TEST 605 JMP TEST MODE 5; FLAG = 0000 
11515 LR ERR RETR REEEEREEREREEE EERE REE EE Eee 
11516 041426 TST605: 

11517 041426 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 

11518 041430 012700 000605 MOV #605,R0 ;;LOAD RO WITH TEST NUMBER 

11519 041434 013701 041446 MOV a@F2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11520 041440 012702 041472 MOV #JMPS5SA,R2 ;CR2] = ADDR +2 OF JUMP ADDRESS 
1255 041444 000257 ccc 7SET N:C = 0000 

1ese 041446 000152 2s: JMP a-(R2) > TEST THE JMP - GO TO 4$ 

11525 041450 104006 3$: ERROR 6 7 JMP FAILED TO LOAD PC 

11359 041452 000410 8R TST606 ::GO TO SCOPE EXIT 

11528 041454 103403 S$: BCS 5$ ;BR IF JMP SET ‘‘C"’ 

11529 041456 102402 BVS 5$ ;BR IF JMP SET ‘V'' 

11530 041460 001401 BEQ 5$ ;BR IF JMP SET ‘'2°' 

oF #4 041462 100004 BPL TST606 ;7BR IF ‘N'' STILL CLEAR 

11533 041464 104006 5$: ERROR 6 :JMP ALTERED THE CODES = SET 

lige 041466 000402 BR TST606 3:GO TO SCOPE EXIT 

11536 041470 041454 4$ : THIS LOCATION CONTAINS JUMP ADDRESS 
ieee 041472 104006 JMP5A: ERROR 6 ;JMP EXECUTED LIKE A MODE 1 OR 2 
11539 DOI III IIOIOISIDIDIDIIIOIOINIOIOIOIUIOIUIOIDIOIUIDIOIOIOIOIOIIIOISIOIOIOI IOI OI OI I ITI TE 
11540 ;*TEST 606 JMP TEST MODE 6; FLAGS = 1111 

11541 4 DI IIIOIIIDIIIOIIIOISIIOIIIDIDIIOIUIDIDIIOIOIOIDIIIOIUIOIDIDIIOIOIDIUIIOIDIDIDIDIIOIIDIIUIOIUIOI 
11542 041474 TST606: 

11545 041474 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

11544 041476 012700 000606 MOV #606,R0 ;ZzLOAD RO WITH TEST NUMBER 

11545 041502 013701 041514 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11546 041500 012702 041540 MOV #7$,R2 ;C€R2] = BASE ADDRESS TO BE INDEXED 

srhea 041512 000277 Scc Z E N:C = 1111 

ice, 041514 000162 177764 es: JMP 4$-7$(R2) ; TEST THE JMP - GO TO 4$ 

11551 041520 104006 3$: ERROR 6 ;JMP FAILED TO LOAD THE PC 

ieee 047522 9000407 BR TST607 3:GO0 TO SCOPE EXIT 

11554 041524 103003 4$: BCC 5$ ;BR IF JMP CLEARED °'C’’ 

11555 041526 102002 BVC 5$ 

11556 041530 001001 BNE 5$ 

sete 041532 100403 : BM! TST607 7 BR IF 'N’’ STILL SET 

11559 041534 104006 = 3: ERROR 6 7 JMP ALTERED CODES - CLEARED 

iizey 041536 000401 BR TST607 3:GO TO SCOPE EXIT 

11562 041546 104006 7$: ERROR 6 ; JMP EXECUTED LIKE A MODE 1 OR 2 OR 
11563 :FAILED TO INDEX [R2] 

11564 

11565 DC ARERR EERE ERR AR ER EREERR REE eee 


a Ce 5 
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CQKDAE .P11 7=SEP= 59 09:47 1607 JMP TEST MODE 6; FLAGS = 0000 SEQ 0214 
11566 s*TEST 607 JMP TEST MODE 6; FLAGS = 0000 

11567 LL UR RREEA EERE A ERE E REE REE EERE RE RARER EERE 
11568 041542 TST607: 

11569 041542 000004 SCOPE 7 CALL THE oh oy reat UTILITY 

11570 041544 012700 000607 MOV #607,R0 LOAD RO WITH T NUMBER 

11571 041550 013701 041562 MOV a4 2$,R1 ‘i OAD R1 WITH TEST INSTRUCTION WORD 
11572 041554 912702 041606 MOV #7$,R2  ;C[R2] = BASE ADDRESS FOR JUMP 

A Ie 041560 000257 ccc ;MAKE N:C = 0000 

ieee 041562 000162 177764 es: JMP 4$-7$(R2) : TEST THE JMP = GO TO 4$ 

11577 041566 104006 3$: ERROR 6 ;JMP FAILED TO LOAD PC 

Lb FLA 041570 000407 BR TST610 ::GO TO SCOPE EXIT 

11580 041572 103403 4$: BCS 5$ ;BR IF JMP SET i 

11581 041574 102402 BvS 5$ ;BR IF JMP SET ‘V"" 

137582 041576 001401 BEQ ;BR IF JMP SET ‘2°’ 

a 34 041600 100003 BPL TST610 37BR IF 'N’' STILL CLEAR 

11585 041602 104006 5$: ERROR 6 7 JMP ALTERED CODES 

lose 041604 000401 BR TST610 3:GO TO SCOPE EXIT 

11588 041606 104006 7$: ERROR 6 7 JMP EXECUTED LIKE A MODE 1 OR 2, OR 
AP = 24 sFAILED TO INDEX CR2] 

11591 5 Re ee Te Be Ti Te Se Br Te Be ee te TTR RRR ER EERE ERE EERE RRERER EERE 
11592 S*TEST 610 JMP TEST MODE 7; FLAGS = 1111 

11593 : eKRRERRERRRERREREREEAREERRRA EERE EERE ERR ERE R ERE RAE hRET eRe 
11594 041610 751610: 

11595 041610 000004 SCOPE : CALL THE SCOPE LOOP UTILITY 

11596 041612 012700 000610 MOV #610, ~ ;LOAD RO WITH TEST NUMBER 

11597 041616 013701 041630 MOV a42$,R > LOAD R1 WITH TEST INSTRUCTION WORD 
11598 041622 012702 041640 MOV #5$, a ;(R2] = BASE t~ey 

ane 041626 000277 SCC 7MAKE N:C = 1111 

49 41 041630 000172 000020 2$: JMP a8$-5$‘(R2) i TEST THE JMP = GO TO 4$ 

ic 

11603 041634 104006 3$: ERROR 6 7 JMP FAILED TO LOAD PC 

sone 041636 000412 BR TST611 ::GO TO SCOPE EXIT 

11606 041640 104006 5$: ERROR 6 7;JMP FAILED TO INDEX OR ACTED LIKE MODE 1 OR 2 
bye 041642 000410 BR TST611 3:GO TO SCOPE EXIT 

11609 041644 103003 S$: BCC 7$ ;BR IF JMP CLEARED ‘'C’’ 

11610 041646 102002 BVC 7$ ;BR IF JMP CLEARED ‘V"' 

11611 041650 001001 BNE 7$ ;BR IF JMP CLEARED ‘'27"' 

be $3 4 041652 100404 BM] TST671 77BR IF 'N’’ STILL SET 

11614 041654 104006 7$: ERROR 6 ;JMP ALTERED CODES - CLEARED 

$5 | 041656 000402 BR TST611 ::GO0 TO SCOPE EXIT 

4, ot 041660 041644 8$: 4$ : THIS LOCATION CONTAINS JMP ADDRESS 
byt 041662 104006 ERROR 6 ;JMP EXECUTED LIKE MODE 6 

11627 LRA RR ERR REE AR REE RERR REE RRR eee 
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CQKDA=E KD11=K BASIC LOGIC TE 
CQKDAE .P 11 17=SEP=79 09:47 7611 JMP TEST MODE 7; FLAGS = 0000 SEQ 0215 
11622 :*TEST 611 JMP TEST MODE 7; FLAGS = 0000 

11623 CDI III IOI IUIOIIIIIOIUUIOIOIUIDIOIIOIDIOIDIOIIOIUIOIIUIOIOIUINIUIOUIOIIUIIUIOIUI tt ttittm 
11624 041664 TST611: 

11625 041664 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
11626 041666 012700 000611 MOV #611,R0 +310 OAD RO WITH TEST NUMBER 

11627 041672 013701 041704 MOV @42$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11628 041676 012702 041714 MOV M5$,R2  ;[R2] = BASE ADDRESS 

HA 4 24 041702 000257 ccc 7MAKE N:C = 0000 

bg 2 041704 000172 000020 e$: JMP 08$-5$(R2) ;TEST THE JMP = GO TO 4$ 

11633 041710 104006 3$: ERROR 6 ;JMP FAILED TO LOAD PC 

Bt 041712 000412 BR TST612 3:GO TO SCOPE EXIT 

11636 041714 104006 5$: ERROR 6 ;JMP FAILED TO INDEX 

tet 4 041716 000410 BR TST612 ::GO TO SCOPE EXIT 

11639 041720 103403 . 4$: BCS 7$ BR IF JMP SET ‘‘C’" 

11640 041722 102402 BVS 7$ ;BR IF JMP SET ‘V"" 

11641 041724 001401 BEQ 7$ ;BR IF JMP SET ‘'7"' 

ack 041726 100004 BPL TST612 37BR IF 'N'’ STILL CLEAR 

11644 041730 104006 7$: ERROR 6 :JMP ALTERED CODES - SET 

he 5 041732 000402 BR TS1612 3:GO TO SCOPE EXIT 

siege 041734 041720 8$: 4$ ; THIS LOCATION CONTAINS JUMP ADDRESS 
St 041736 104006 ERROR 6 7 JMP EXECUTED LIKE A MODE 6 

11651 DD IIIOIIIIICIDIIIUIDIDIDIIOIUIDIOIOIOIOIUIDIUIOIOIDIOIOIUIOIOIDIOIDIDIOIDIOIOIOIOIOIUIOIIOIDIDISIOI IOI IDE 
11652 i*TEST 612 JSR MODE 1 TEST = LOAD PC / PUSH SP 

11653 DOOD IDIDIIOIIIIIDIIUIDIIOOIIUIOIUIOIDIUIIOIUUIUIUIUIOIUIOIDIOIUIOIUIOIOIU IOI IOI Ri ttt 
11654 041740 TST612: 

11655 041740 000004 SCOPE : CALL THE SCOPE LOOP UTILITY 
11656 041742 012700 000612 MOV #612,R0 ;LOAD RO WITH TEST NUMBER 

11657 041746 013701 041770 MOV a#2$,R1 + LOAD R1 WITH TEST INSTRUCTION WORD 
11658 041752 010605 MOV SP.R5 ;SAVE THE SP 

11659 041754 010737 001010 MOV PC. ‘ A#SLPERR SET ERROR LOOP ADDRESS 

11660 041760 010506 1$: MOV R5,SP ZRESTORE SP FOR ERROR LOOPING 
11661 041762 012702 041774 MOV #4$, R2 ;DEST ADDR = 4$ 

Be 041766 000257 CCC :SCOPE SYNC 

areee 041770 004412 es: JSR R4, (R2) ; TEST THE JSR - GO TO 4$ 

sec 041772 104006 3$: ERROR 6 7JSR FAILED TO LOAD THE PC 

11668 041774 005726 4$: TST (SP) + ;POP THE SP 

11669 041776 020605 CMP SP,R5 :DID JSR PUSH THE SP ? 

4 cA 042000 001406 BEQ TST613 > BR IF YES 

11672 042002 005746 TS? -(SP) ;RESTORE ERROR SP 

11673 042004 010603 MOV SP,R3 ;(R3J= WAS SP 

11674 042006 010504 MOV RS 

11675 042010 005744 TST -(R4G,; ;CR4]= S/B SP 

za J 042012 104003 5$: ERROR 3 7JSR FAILED TQ PUSH THE SP 

11 
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CQKDA-E KD11-K BASIC LOGIC TE 
CQKDAE .P11 17=SEP=79 09:47 T612 JSR MODE 1 TEST = LOAD PC / PUSH SP SEQ 0216 | 
11678 042014 010506 MOV R5,SP RESTORE SP IN CASE OF ERROR 

11679 DI ITI IIIIICIIIOIICIIOIIOIIDIOIOIIOIUIOIUIOIOIUOIIUIUIOIUIUIUIIOIUIOI UIC IOI tt 
11680 *TEST 613 JSR MODE 1 TEST = CHECK RN AND OLD PC 

11681 OUI EIU IOI IDISIIOIIIUIDIOIUIIIOIOIDIIIOIOIUIIUIUICIUIUIIDIOIIOIIIOIUIOIOIIUIIUIOIIOIIIOI IOI ttt tt 
11682 042016 TST613: 

11683 042016 000004 SCOPE CALL THE SCOPE LOOP UTILITY 

11684 042020 012700 000613 MOV #613,R0 ;;LOAD RO WITH TEST NUMBER 

11685 042024 013701 042056 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11686 042030 010605 MOV SPR SAVE THE SP 

11687 042032 010737 001010 MOV PC ,@#$LPERR ;SET ERROR LOOP ADDRESS 

11688 042036 010506 1$: MOV R5,SP sRESTORE SP FOR ERROR LOOPING 
11689 042040 012702 042062 MOV #4$,R2 ;DEST ADDR = 4$ 

11690 042044 005066 177776 CLR -2¢(SP) INIT STACK LOC TO GET [R4] 

11691 042050 012704 125252 MOV #125252,R4 INIT RN = 125252 

iscok 042054 000257 ccC ;SCOPE SYNC 

iaot 042056 00441? 2$: JSR R4,(R2) ; TEST THE JSR = GO TO 4$ 

begs 042060 104006 3$: ERROR 6 ;JSR FAILED TO LOAD THE PC 

11698 042062 022726 125252 4$: CMP #125252, (SP)+ ;DID JSR SAVE REG ON STACK 

Hh 26 042066 001401 BEQ 8$ ;BR IF IT DID 

ead 042070 104005 5$: ERROR 5 ;JSR FAILED TO SAVE REG ON STACK 
11703 042072 022704 042060 8$: CMP #3$,R4 :DID OLD PC GET SAVED ? 

Bf od 042076 001401 BEQ 6$ :BR IF YES 

hha. 042100 104005 7$: ERROR 5 ;JSR FAILED TO SAVE TH GD PC 

a 042702 010506 6$: MOV R5,SP ;RESTORE SP IN CASE ERROR SCREWED IT UP 
11710 CD III IOIOIIISIIIOIOIOIUIIOIOIOIOIIUIOIDIOIUIIOIOIOIOIUIUIOIOIOIUIIOIOIOIOIUIOIOIDIDIOINIOIOINIO IO tt 
11711 *TEST 614 JSR MODE 1 TEST - N:C = 0000 

11712 DR Ae RTT TTT IR REE EERE KERR 
11713 042104 TST614: 

11714 042104 000004 SCOPE :CALL_ THE SCOPE LOOP UTILITY 

11715 042106 012700 000614 MOV #614,R0 3:LOAD RO WITH TEST NUMBER 

11716 042112 013701 042146 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11717 . SBTTL USER CONTROLLED BREAKPOINT -- BIT12 

11718 042116 032737 010000 063240 BIT #B1T12,¢dABPTLOC ;BREAKPOINT HALT SET ?? 

11719 042124 001401 BEQ . +4 ;BR IF NOT 

11720 042126 000000 HAL T ;BREAK=DEPRESS CONTINUE TO CONTINUE 
11727 042130 010605 MOV SP,R5 SAVE THE SP 

11722 042132 010737 001010 MOV PC ,@#$LPERR ;SET ERROR LOOP ADDRESS 

11723 042136 010506 1$: MOV R5,SP RESTORE SP FOR ERROR LOOPING 

11724 042140 012702 042152 MOV #4$,R2 ;DEST ADDR = 4$ 

44 042144 000257 ccc iN:C = 0000 

itiee 042146 004412 2$: JSR RS, (R2) ; TEST THE JSR - GO 10 4$ 

Hes 042150 104006 3$: ERROR 6 ;JSR FAILED TO LOAD THE PC 

11731 042152 100403 4$: —: 5$ iN:C = 0000 ? 

11732 042154 001402 BEQ 5$ 

17733 042156 102401 BvS 5$ 
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CQKDA=E_KD11-K BASIC LOGIC TE 
CQKDAE .P11 17=SEP=79 09:47 USER CONTROLLED BREAKPOINT -- BIT12 SEG 0217 
1icee 042160 103001 BCC 6$ 

bye 042162 104005 5$: ERROR 5 7JSR FAILED = ALTERED FLAGS 

11738 042164 010506 6$: MOV R5,SP RESET SP IN CASE OF ERROR 

11739 DOU UO OOOO USI CISIIUIIUISIOINIOIIEIINISIOISIISISIEIIIIIIO OUEST IIIS 
11740 S*TEST 615 JSR MODE 1 TEST = N:C = 1111 

11741 SRR REE RRR RRR REAR REE REE RAEEREREREERREEER EEE 
11742 042166 157615: 

11743 042166 4 SCOPE :CALL_THE SCOPE LOOP UTILITY 
11744 042170 012700 000615 MOV #615,RO 7;LOAD RO WITH TEST NUMBER 

11745 042174 013701 042216 MOV af#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11746 042200 010605 Mov — SP, R5 SAVE THE SP 

11747 042202 010737 001010 MOV PC; a#$LPERR SET ERROR LOOP ADDRESS 

11748 042206 010506 1$: MOV RS ,SP ;RESTORE SP FOR ERROR LOOPING 
11749 042210 012702 042222 MOV #4$,R2 ot a ADDR = 4$ 

Ee 042214 000277 SCC sN:C = 1111 

a 042216 004412 2$: JSR R4, (R2) ; TEST THE JSR = GO TO 4$ 

Be = 042220 104006 3$: ERROR 6 ;JSR FAILED TO LOAD THE PC 

11756 042222 100003 4$: BPL 5$ iN:C = 1111 ? 

11757 042224 001002 BNE 5$ 

11758 042226 102001 BVC 5$ 

11759 042230 103401 BCS 6$ 

at 042232 104005 5$: ERROR 5 :JSR ALTERED FLAGS 

1 042234 010506 6$: MOV RS,SP sRESET SP IN CASE OF ERROR 

11764 DIS IIIIOIDIOIIIOIIOIOIIOIOIOIOIOIOIOIOIUIIIOIUIOIOIOIIIOIOIIOIOIOIIO IOI ITO IOI OTT TE 
11765 *TEST 616 JSR MODE 2 TEST 

11766 CDI IIIIOI I IIGIOIIIOIISIDIOIOIDIOIOIOIUIOIOIUIOIOIUIOIOIOIIOIOIOIOIOIIOIOIIIOI GIO IIIT III IGT 
11767 042236 TST616: 

11768 042236 000004 SCOPE :CALL_THE SCOPE LOOP UTILITY 
11769 042240 012700 000616 MOV #616,RO 7;LOAD RO WITH TEST NUMBER 

11770 042244 013701 042266 MCV a42$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11771 042250 010605 MOV SP,R5 ;SAVE THE SP 

11772 042252 010737 001010 MOV PC,@4$LPERR SET ERROR LOOP ADDRESS 

11773 042256 010506 1$: MOV RS ,SP :RESET SP FOR ERROR LOOPS 

11774 042260 012702 042272 MOV A4$ ,R2 DEST ADDR = 4$ 

ee 042264 000257 of SCOPE SYNC 

ee 042266 004422 23: JSR R4,(R2)+ ; TEST THE JSR - GO TO 4$ 

ae 042270 104006 3$: ERROR 6 ;JSR FAILED TO LOAD THE PC 

11781 042272 005726 4$: TST (SP) + RESET SP 

11782 042274 020605 CMP SP,R5 ;DID JSR PUSH STACK ? 

Ate Sy 042276 001406 BEQ TST617 :;BR IF YES 

11785 642300 005746 TST -(SP) RESET SP TO ERROR VALUE 

11786 042302 010603 MOV SF ,R3 WAS SP 

11787 2304 010504 R5 ,R4 

11788 2306 005744 TST ~(R4) ;S/B SP 

11789 042310 104003 5$: ERROR 3 3 JSR FAILED TO PUSH SP 
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1616 JSR MODE 2 TEST 


MOV R5,SP RESTORE SP JUST IN CASE 
RRR ERE EEE ERER REE 


SeTEST 617 JSR MODE 3 TEST 


Wet SAAS AER E EERE EERE REE RRR RRRR SSR ERR R ERR R ARES ERASERS RRR AES RA SESS 


1$1617: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #617,R0 LOAD RO WITH TEST NUMBER 
MOV ar2$.Ri ‘TOAD R1 WITH TEST INSTRUCTION WORD 
MOV SP,R5 :SAVE THE SP 
MOV PC; aS PERR :SET ERROR LOOP ADDRESS 
1$: MOV R5-S ‘RESET SP FOR ERROR LOOPS 
MOV 778. R2 “DEST ADDR = (7$] 
CCC SSCOPE SYNC 
2$: JSR R4,a(R2)+ :TEST THE JSR - GO TO 4$ VIA 7$ 
3$: ERROR 6 ;JSR FAILED TO LOAD THE PC 
4$: TST (SP) + :RESET SP 
CMP SP,R5 [DID JSR PUSH STACK ? 
BEQ TST620 :7BR IF YES 
TST ~(SP) :RESET SP TO ERROR VALUE 
MOV SP,R3 SWAS SP 
R5 RG 
TST =(R4) :S/B SP 
S$: ERROR 3 *JSR FAILED 
BR 6$ [GO EXIT 
7$: 4$ :CONTAINS JUMP ADDR 
ERROR 6 *JSR EXECUTED LIKE A MODE 1 OR 2 
6$: MOV R5S,SP :RESTORE SP JUST IN CASE 


'—WEROAAAAALA 20222222 R22 SRSREAASESASESEERASESER SSSR S ERR RRS EERE SERRE 


S*TEST 620 JSR MODE 4 TEST 


WEDS LLAR£A£ 2222 220 PESRSSSSSESESESSSLER ESE SESE RRR RRR REESE REESE S| 


751620: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #620 RO -:LOAD RO WITH TEST NUMBER 
MOV av2$.Ri ‘LOAD R1 WITH TEST INSTRUCTION WORD 
MOV SP,R5 SSAVE THE SP 
MOV PC a¥$LPERR *SET ERROR LOOP ADDRESS 

1$: MOV R5.SP [RESET SP FOR ERROR LOOPS 
MOV #5$,R2 “DEST ADDR = 4$+2 
CCC =SCOPE SYNC 

2$: JSR R4,-(R2) : TEST THE JSR - GO TO 4$ 

3$: ERROR 6 :JSR FAILED TO LOAD THE PC 

4$: BR 6$ ; JUMPED OK = GO CHECK 

S$: ERROR 5 ‘JSR FAILED TO DECREMEAT DEST REG 
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CQKDA“E KD11-K BASIC LOGIC TE 
CQKDAE .P11 17-SEP-79 09:47 1620 JSR MODE 4 TEST SEQ 0219 
11846 042440 005726 6$: TST (SP) + ;RESET SP 

11847 042442 020605 CMP SP,R5 “DID JSR PUSH STACK ? 

Mb 9¢ 042444 001406 BEQ TST621 : BR IF YES 

11850 042446 005746 TST -(SP) ;RESET SP TO ERROR VALUE 

11851 042450 010603 . MOV SP,R3 WAS SP 

11852 042452 010504 MOV R5.R4 

11853 042454 005744 TST -(R4) :S/B SP 

11854 042456 104003 7$: ERROR 3 ‘JSR FAILED TO PUSH SP 

11856 042460 010506 8$: MOV R5,SP :RESTORE SP JUST IN CASE 

BL 214 LEAR RARER AREER ERREEEERAEERERRERR ORE REREEEERREERE KEKE 
11859 s*TEST 621 JSR MODE 5 TEST 

11860 DIARRA REE RARER AREERERRERERREEER EEE 
11861 042462 +§1621: 

11862 042462 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
11863 042464 012700 000621 MOV #621,R0 ; LOAD RO WITH TEST NUMBER 

11864 042470 013701 042512 MOV a#2$.R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
11865 042474 010605 MOV SP,R5 [SAVE THE SP 

11866 042476 010737 001010 MOV PC ,@4$LPERR 7 SET ERROR LOOP ADDRESS 

11867 042502 010506 1$: MOV R5,SP RESET SP FOR ERROR LOOPS 

11868 042504 012702 042542 MOV #7$,R2 “DEST ADDR = [7$ - 2) 

11869 042510 000257 ccc >SCOPE SYNC 

by <a 042512 004452 2$: JSR R4,a-(R2) TEST THE JSR = GO TO 4$ 

Ay a 042514 104006 3$: ERROR 6 JSR FAILED TO LOAD THE PC 

11875 042516 005726 4$: TST (SP) + RESET 

11876 042520 020605 CMP SP,R5 ‘DID m9 PUSH STACK ? 

11877 042522 001411 BEQ TST622 ‘;BR IF YES 

11879 042524 005746 TST -(SP) ZRESET SP TO ERROR VALUE 

11880 042526 010603 MOV SP,R3 SWAS SP 

11881 042530 010504 MOV R5.R4 

11882 042532 005744 TST -(R4) 3S/B SP 

11883 042534 104003 5$: ERROR 3 :JSR FAILED TO PUSH SP 

11884 042536 000402 BR 6$ *GO EXIT 

11886 042540 042516 4$ CONTAINS JUMP ADDRESS 

Ah - +4 042542 104005 7$: ERROR 5 JSR EXECUTED LIKE A MODE 1 OR 2 
By 44 042544 010506 6$: MOV R5,SP SRESTORE SP JUST IN CASE 

11891 LEER REE RRR RE REE REE REE ARERR EEE 
11892 SSTEST 622 JSR MODE 6 TEST 

11893 TTT TIT TTI TITI TITTLE TTL ELLIE LLL ELLE LEE LLL LEE LELELLLELL 
11894 042546 1$1622: 

11895 042546 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
11896 042550 012700 000622 MOV #622,RO >:LOAD RO WITH TEST NUMBER 

11897 042554 013701 042576 MOV a#2$.R1 ‘TOAD R1 WITH TEST INSTRUCTION WORD 
11898 042560 010605 MOV SP,R5 *SAVE THE SP 

11899 042562 010737 001010 MCV PC a#SLPERR ;SET ERROR LOOP ADDRESS 

11900 0425 010506 1$: MOV R5S,SP sRESET SP FOR ERROR LOOPS 

11901 042570 012702 042602 MOV #3$,R2 *(R2] = BASE DEST ADDR 


1 
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CQKDAE .P11 17=SEP=79 09:47 T622. JSR MODE 6 TEST SEQ 0220 
11902 042574 000257 CCC :SCOPE SYNC 

11904 042576 004462 000002 2s: JSR R4,4$-3$(R2) :TEST THE JSR = GO TO 4$ 

11906 042602 104006 38: ERROR 6 ;JSR FAILED TO LOAD THE PC OR INDEX FAILED 
11908 042604 005726 4$: TST (SP)s :RESET SP 

11909 042606 020605 CMP SP,R ;DID JSR PUSH STACK ? 

11910 042610 001406 BEQ feos ::;BR IF YES 

11912 042612 005746 TST -(SP) sRESET SP TO ERROR VALUE 

11913 042614 010603 MOV SP,R3 WAS SP 

11914 042616 010504 MOV R5,R4 

11915 042620 005744 TST -(R4) 3S/B SP 

11916 042622 104003 5$: ERROR 3 JSR FAILED TO PUSH STACK 

11917 042624 010506 MOV RS,SP SRESET SP JUST IN CASE 

11919 DR REE EERE REAR REE ERERERREEERE REE 
11920 s*TEST 623 JSR MODE 7 TEST 

11921 SLR RRR RRR RRR RRR E ERE EERE ARERR EEE 
11922 042626 1§7623: 

11923 042626 SCOPE :CALL THE SCOPE LOOP UTILITY 
11924 042630 012700 000623 MOV #623,RO OAD RO WITH TEST NUMBER 

11925 042634 013701 042656 MOV a#2$,R1 fiery R1 WITH TEST INSTRUCTION WORD 
11926 042640 010605 MOV SPR5 *SAVE THE SP 

11927 042642 010737 001010 MOV PC; - @NSLPERR :SET ERROR LOOP ADDRESS 

11928 042646 010506 1$: MOV R5.S ;RESET SP FOR ERROR LOOPS 

11929 042650 012702 042662 MOV #3$, sR “BASE DEST ADDR = 3$ 

teat 042654 CCC SCOPE SYNC 

11932 042656 006472 000024 2$: JSR R4,a7$-3$(R2)  ;:TEST THE JSR - GO TO 4$ VIA 7$ 
11934 042662 104006 3$ ERROR 6 ;JSR FAILED TO LOAD THE PC 

11935 ‘OR THE INDEX FAILED 

11937 042664 005726 4$: TST (SP)+ :RESET SP 

11938 042666 020605 CMP SP,R5 DID JSR PUSH STACK ? 

ba 4 042670 001411 BEQ TST624 ze IF YES 

11941 042672 005746 TST -(SP) sRESET SP TO ERROR VALUE 

11942 042674 010603 MOV SP,R3 “WAS SP 

11943 042676 010504 MOV R5.R4 

11944 042700 005744 TST -(R4) 3S/B SP 

11945 042702 104003 5$: ERROR 3 JSR FAILED TO PUSH STACK 

11946 042704 000402 BR 6$ “SKIP TO EXIT 

11948 042706 042664 7$: 4$ : CONTAINS JUMP ADDR 

11949 042710 104005 ERROR 5 ‘JSR WORKED LIKE A MODE 1 OR 2 
11951 042712 010506 68: MOV RS, SP :RESTORE SP JUST IN CASE 

11953 ° cms aa ake SORE. Eee ae B.. ten Remearen ce ee 
11954 se TEST 624 SOB TEST, CR) = NO BRANCH 

11955 bd meee Gee | BER TEST, Or © 2, 6) CU 
11956 0642714 151624: 

11957 0427146 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 


B 2 
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11958 012700 000624 #624 RO ::LOAD RO WITH TEST NUMBER 

11959 a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
042726 012702 000001 #1 RD ‘SET SOB COUNTER = 1 

2$-2 ‘GO DO THE SOB 


3$: 6 ;SOB SHOULDN'T HAVE BRANCHED HERE 
BR TST625 >;G0 TO SCOPE CALL 


000257 SYNC INSTR. 
077204 2$: R2,3$ ; TEST THE SOB 


= RREREAREH EERE ARAAEAAEEAEAAEARAEAAAAEAARAEARAEAAAKAERAERAEREEREHREEE 


T*TEST 625 SOB TEST, CR] = 5, BRANCH 4 TIMES 


STARR RARER RARER RARE RREREREEREREEREREERERERREERAERERERKER EEE 


1$1625: 


SESSPERES 


Ye) 
38 


;CALL_ THE SCOPE ag UTILITY 
#625 ,RO T;LOAD RO WITH TEST NUMBER 
043004 @4S0B2,R1 ;GET COPY OF TEST INSTRUCTION WORD 
000005 #5,R2 :SET SOB COUNTER = 5 
177773 #-5,R5 ;SET UP_RS5 TO COUNT 5 BRANCHES 
SOB2-2 :GO DO THE SOB 


S0B3 ;USED BY LAST SOB TEST TO TEST MAX OFFSET 
SOFFSET ADJUSTMENT 


OO0D0O00O0 
NNNNNNWG 
NOUESWIN 


S 
o 


R5 ; COUNT ONE BRANCH 
SOBERR ;BR IF TOO MANY LOOPS BY SOB 


: SCOPE SYNC 
R2,S0B5 ;TEST THE SOB 
R2 3R2 SHOULD CONTAIN 0 
TST626 ;;BR IF IT DOES 


6 ;SO0B COUNTER NOT ZERO 
BR TST626 3;GO TO SCOPE CALL 
SOBERR: ERROR 6 ;SOB MADE TOO MANY BRANCHES 


& eta Mh et st ke |!!! 


S*TEST 626 SOB TEST, CR) = 1, FLAGS = 1111 


. ck hg I hE Mit Beene od oe, SIRT 


151626: 
000004 +r THE SCOPE LOOP UTILITY 
012700 000626 MOV #626 ,RO OAD RO WITH TEST NUMBER 

013701 a42$,R1 iOAD R1 WITH TEST INSTRUCTION WORD 
012702 000001 #1,Re SET SOB — * 

000277 >MAKE N:C = 11 


077202 : R2,2$-2 : TEST THE SOB 


3$ 
3$ 


3$ 
TST627 


ce ee ee ee em hm eh ec ee ee a ed a ed od ed 


CER RS RRS LL it tof tet ot Ps 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
: 
1 
; 
1 
: 
1 
1 
: 
1 
1 
1 
1 
1 
1 
1 
: 
} 
1 
1 
1 
1 
1 
1 
1 
1 
1 
: 
1 
1 
, 
1 


ae 


SOB ALTERED CODES = CLEARED ONE 
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me 
te 


S 
17S 


077202 


103403 
102402 
001401 
100001 


104006 


000004 
012700 
013701 
012702 
000257 


077277 


163403 
102402 
001401 
100001 


000630 
043130 
000005 


000631 
043104 
000005 


a 
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T626 SOB TEST, (R) = 1, FLAGS = 11 SEQ 0222 
FLERE REREAEAERAREEAERAREAERARREREARERAERREREREAREREERREAREAEA ES 
s*TEST 627 SOB TEST, CR] = 1, FLAGS = 0000 
CFA AARARARAAERERARAREREARARARARARAERRARARARAARAREARARARREARRARARAAEAEEEE 
TST627: 

SCOPE # CALL THE SCOPE LOOP UTILITY 

MOV #627,R0 ;LOAD RO WITH TEST NUMBER 

MOV af2$,R1 + LOAD R1 WITH TEST ‘pelmeniicn: WORD 

MOV #1,R2 ‘SET SOB COUNTER = 

ccc ;MAKE N:C = 0000 
2$: SOB R2,2$-2 ; TEST THE SOB 

BCS 3$ ;BR IF C = 1 

BvS 3$ ;BR IF V = 1 

BEQ 3$ sOR IF Z = 1 

BPL TST630 :;BR IF N= 0 
3$: ERROR 6 ;SOB ALTERED CODES - SET ONE 
cre ce ee ee ee ee ee ee ee 
:*TEST 630 SOB TEST, [RJ = 5, FLAGS = 1111 
Wine ARSAARASARARARSSASES SARS SRS SSSR S ESSERE SERS SRS ESR RSE S SESE SEAS SS 
1S1630: 

OPE a THE SCOPE LOOP tT ge 

MOV #630,RO OAD RO WITH TEST 

MOV a#2$,R1 ‘i oaD R1 WITH TEST INSTRUCTION WORD 

MOV #5,R2 ;SET SOB COUNTER = 5 

SCC “MAKE N:C = 1111 
2$: S08 R2,2$ ;TEST THE SOB 

BCC 3$ ;BR IF C =0 

BVC 3$ ;BR IF V=0 

BNE 3$ sBR IF Z=0 

BM! TST631 ::;BR IF N= 1 
3$: ERROR 6 ;SOB ALTERED CODES - CLEARED ONE 
SU ARERR ERR REE ERE EERE REE EEE EERE AERA RRERER EERE 
:*TEST 631 SOB TEST, [RJ] = 5, FLAGS = 0000 
CURR ERE EREREERREEREERARERREEEEEEE EH 
TST631: 

SCOPE » CALL THE SCOPE Loe UTILITY 

MOV #631,R0 :LOAD RO WITH TEST NUMBER 

MOV @4S0R4 ,R1 “GET COPY OF TEST INSTRUCTION WORD 

MOV #5,R2 “SET SOB COUNTER = 5 
SOB3: CCC MAKE N:C = 0009 
SOB4: $0B R2,S081 : TEST THE SOB 

BCS 3$ sBR IF C = 1 

BVS 3$ :BR IF V = 1 

BEQ 3$ :BR IF Z = 1 

BPL TST632 :;BR IF N= 0 
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15070 043176 104006 3$: ERROR 6 ;SOB ALTERED CODES = SET ONE 
12072 D+ eae ay enlace atime lela i 
32073 s*TEST 632 RTS TEST - N:C = 0000 
12074 LL RAR AREER ERR EERE EERE EER RARER ERE RRR EEE RETR 
12075 043200 TST632: 
12076 043200 000004 SCOPE + THE SCOPE LOOP UTILITY 
12077 043202 012700 000632 MOV #632,R0 OAD RO WITH TEST NUMBER 
12078 043206 013701 043240 MOV a#2$,R1 ‘i OAD R1 WITH TEST INSTRUCTION WORD 
12079 043212 010605 MOV SP,R5 ZSAVE THE SP 
12080 043214 010737 001010 MOV PC ,@4$LPERR + SET ERROR LOOP ADDRESS 
12081 043220 012704 177777 1$: MOV #-1,R4 ;R3 SHOULD GET 177777 
12082 043224 010506 MOV R5,SP TRESET SP FOR ERROR LOOP 
12083 043226 012703 043246 MOV #4$,R3 ;RTS SHOULD LOAD PC FROM CR3] 
12084 043232 012746 177777 MOV #-1,-(SP) RTS SHOULD LOAD R3 WITH 177777 
Some 043236 000257 ccc iN:C = 0000 
ba sf 043240 000203 es: RTS R3 ; TEST THE RTS - GO TO 4$ 
12089 043242 104005 3$: ERROR 5 ;RTS FAILED TO LOAD THE PC 
sia 043244 000415 BR 10$% 3;GO TO EXIT = SCHOOLS OUT 
12092 043246 100403 4$: BM] 5$ iN:C = 0000 ? 
12093 043250 001402 BEQ 5$ 
12094 043252 102401 BVS 5$ 
iSoee 043254 103001 BCC 6$ 
fad 043256 104005 5$: ERROR 5 zRTS ALTERED CODES - CLEARED ONE 
12099 043260 020403 6$: CMP R4,R3 ;DID R3 GET LOADED FROM STACK ? 
Sint 043262 001401 BEQ 8$ ;BR IF YES 
1S los 043264 104002 7$: ERROR 2 sRTS FAILED TO LOAD REG 
12104 043266 020506 8$: CMP R5,SP ;DID RTS POP THE STACK POINTER ? 
isi’ 043270 001404 BEQ TST635 ;7BR IF YES 
12107 043272 010504 MOV R5,R4 ;CR4J] = Y / B SP 
12108 043274 010603 MOV SP ,R3 > CR3] = WAS SP 
E464 043276 104003 9$: ERROR 3 ‘RTS FAILED TO POP SP 
1st3 043300 010506 10$: MOV R5,SP sFIX THE SP 
12113 Fel alata cig oat inte O-line 
12114 S*TEST 633 RTT TEST - N:C = 1111 
12115 St Re Te te Te te i i RRR ERE REE RERREEEREKE ERE RE 
12116 043302 151633: 
12117 043302 000004 SCOPE 7 CALL THE SCOPE LOOP UTILITY 
12118 043304 012700 00063? MOV #633,R0 ;LOAD RO WITH TEST NUMBER 
12119 043310 013701 043352 MOV a#2$,R1 ‘LOAD R1 WITH TEST Veitch WORD 
12120 043314 012702 177776 MOV #PSW,R2 ;DEST=PSwW FOR 5$ CAL 
12121 043320 010605 MOV sP,R5 :SAVE THE SP 
12122 043322 010737 001010 MOV PC. * @#SLPERR SET ERROR LOOP ADDRESS 
12123 043326 010506 1$: MOV R5,SP SRESET SP FOR ERROR LOOP 
12124 043330 012704 000340 MOV #340,R4 3(R4] = S / B PSW AT HTIS POINT 
12125 043334 012746 000340 MOV #340,-(SP) [NEW PSW S / B = 340 
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anil 
as) 

= 
rrr 
IOs 

Rg 

Ww 

rs 

So 


ee a a ad a es I 8 2 
NMOMNINNMNNN NINN PNP 
ee ed edd od a et i I 
SE \NWW'N\WNWANWWANWG 
SSSIKAREYSLSY 


aon 
R 
WG 
AN 
vi 
oOo 


17=SEP=79 
6 


104005 
000412 


013703 
020403 
001401 
104001 


02050€ 
001404 


910504 


177776 


043466 
000340 


177776 


177776 


MACY11 eee t 
1633 


8$: 


san” dae Uae cine cer ee 


S*TEST 634 


151634: 


E 2 
17=SEP=79 — 
TEST = N:C = 111 


#4$,-(SP) 
a4PSwW 


5 
8$ 


aAPSW,R3 
R4,R3 

6$ 

1 


R5,SP 
TST634 


R5,R4 
“Bans 


R5,SP 


RTT TEST - N:C 


SRR RAE EERE EEE 


#4$,-(SP) 
#340, a4PSW 


aAPSwW RS 
R4,R3 

6$ 

: 


R5,SP 
TST635 


R5,R4 
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sNEW PC S / 
3N:C = 1171 


; TEST THE RTT = GO TO 4$ 


RTT FAILED TO LOAD THE PC 
;GO TO EXIT = SCHOOL'S OUT 


;SAVE THE PSwW 


ZWAS PSW = 


RTT FAILED TO LOAD PSW PROPERLY 
;DID RTT UPDATE THE SP ? 


;:BR IF YES 


5 


B= 
;CLEAR THE PSwW 


340 ? 
;BR IF IT WAS 


;CR4] = a : B SP 


:CR3] = WAS SP 
RTT FAILED TO UPDATE SP 


FIX THE SP 


0000 


—_ THE SCOPE LOOP UTILITY 
OAD RO WITH TEST NUMBER 
{OAD R1 WITH we ere WORD 


;DEST=PSW FOR 5$ C 
>SAVE THE SP 


>SET ERROR LOOP ADDRESS 
;RESET SP FOR ERROR LOOP 
= § / B PSW a HTIS POINT 


; TEST THE RTT - GO TO 4$ 


RTT FAILED TO LOAD THE PC 
:GO TO EXIT = SCHOOL'S OUT 


SAVE THE PSW 
WAS PSW = 017 ? 
;BR IF IT WAS 


:RTT FAILED TO LOAD PSwW PROPERLY 
;DID RTT UPDATE THE SP ? 
;;BR IF YES 


3(R4] = S / B SP 


CQKDA=E KD11=-K BAS! 
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oO 
N 


043506 
043510 


043512 


C LOG 
17=SEP=79 
3 

3 


01060 
10400 


010506 


000444 


103011 
013703 


001074 


001074 


177776 
001074 


177776 


043564 


043564 
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7634 RTT TEST = N:C = 0000 


MOV SP,R3 ;=R3J = WAS SP 
7$: ERROR 3 :RTT FAILED TO UPDATE SP 
8$: MOV RS ,SP 3FIX THE SP 


SCRE REAR ERRERKEEAEEAER EERE REE E 


SeTEST 635 MARK INSTRUCTION TEST - N:C=0000 


RRR EEKREK ES 


151635: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #635,R0 ;;LOAD RO WITH TEST NUMBER 
MOV af2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV SP,R2 ;SAVE SP 
MOV #125252,R4 :CR5J SHOULD BE 125252 
MOV #4$,R5 “MARK GOES TO 4$ VIA [RS] 
MOV R4,a%6$ : INITIALIZE WORD LOADED INU RS 
ccc 7N:C=0000 
2s: MARK +5 ; TEST THE MARK 
MOV SP, @4$REGS : SAVE BAD SP FOR PRINTING 
MOV R2,SP SRESET SP 
3$: ERROR 5 ;MARK FAILED TO EXECUTE 
BR TST636 3:GO TO SCOPE EXIT 
6$: 125252 ; THIS WORD SHOULD GET LOADED INTO R5 
MOV SP, aA $REGS : SAVE BAD SP FOR PRINTING 
MOV R2,SP ZRESET SP 
$$: ERROR 5 sMARK FAILED TO LOAD RC FROM [R5] 
BR TST636 3:G0 TO SCOPE EXIT 
4$: BM] 10$ 3N:C=0000? 
BEQ 10$ 
BVS 10$ 
BCC 8$ 
10$: MOV aFPSwW,R3 sSAVE FLAGS IN R3 
MOV SP .a#$REGS ;SAVE BAD SP FOR PRINTING 
MOV R2,SP SRESET SP 
MOV #PSW,R2 ;DEST=PSwW 
7$: ERROR 7 ;MARK SET A FLAG 
BR TST636 :GO TO SCOPE EXIT 
8$: CMP SP ,46$+2 ;DID MARK RESET SP? 
BEQ 11$ [BR IF YES 
MOV SP,R3 ;PUT BAD SP IN R3 
MOV #6$+2,R4 3S/B SP 
MOV R2,SP SRESET SP 
9$: ERROR 3 sMARK FAILED TO RESET SP 
BR TS1636 3260 TO SCOPE EXIT 


11$: CMP R5 RS ;DID MARK RESTORE OLD RS 


SEQ 0225 
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043654 
043656 


17=SEP=79 


001405 


010637 
010503 
010206 
104004 


010206 


000444 


103411 
013703 


09:47 


001074 


0006 36 
043724 


125252 
043754 
043740 


001074 


001074 


177776 
001074 


177776 


04374¢ 


043742 


MACY11 30A(1052) 
1635 


12$: 


BEQ 


G 2 
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MARK INSTRUCTION TEST = N:C=0000 


12$ 
SP, @#$REGS 
R5,R3 


R2,SP 
4 


R2,SP 


;BR IF YES 


:SAVE BAD SP FOR PRINTING 
“RESET § rH 
“MARK FAILED TO RESET R5 


sRESET SP 


oe (APRS R ARRAS ARRRARRARRRRRRARSRARARA RASA A SARA SESE SSR SERRE SASS R EE SG 


TeTEST 636 


1S1636: 


2$: 


3$: 


6$: 


5$: 


4$: 


7$: 


8$: 


SCOPE 
MOV 


MARK INSTRUCTION TEST = N:C=1111 


.. AAAS 22 RR RRRRRRRRRRERRRRRESESARARRESRR RARE SARE SERS ERS R SRR SS EE S| 


#636,RO0 
a#2$,R1 


SP Re 
#125252,R4 
#4$,R5 

R4 ,a46$ 


SP, @#$REG5 
- ial 


TST637 


hg “at 


5 
TST637 


aAPSW R3 
2 ee 


R2,SP 
 emctel 
TST637 
SP ,46$+2 
9$ 


SP ,R3 
#6$+2,R4 
Re, SP 


2 CALL THE SCOPE LOOP UTILITY 
LOAD RO WITH TEST NUMBER 
: LOAD il WITH TEST INSTRUCTION WORD 


AVE S 
:tR3) SHOULD BE 125252 
MARK GOES TO 4$ VIA CR5J 
: INITIALIZE WORE LOADED INTO RS 


; TEST THE MARK 


;SAVE BAD SP FOR PRINTING 
sRESET SP 
sMARK FAILED TO EXECUTE 


::GO0 TO SCOPE EXIT 
THIS WORD SHOULD GET LOADED INTO R5 


;SAVE BAD SP FOR PRINTING 
RESET SP 
s;MARK FAILED TO LOAD RC FROM (RS) 


3:GO TO SCOPE EXIT 
oN: C=1117 


;SAVE FLAGS IN R3 

;SAVE BAD SP FOR PRINTING 
RESET SP 

;DEST=PSwW 

MARK SET A FLAG 

3:GO TO SCOPE EXIT 


7DID MARK RESET SP? 

;BR IF YES 

;PUT BAD SP IN R3 

3S/B SP 

SRESET SP 

;MARK FAILED TO RESET SP 


2 
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CQKDAE .P11 17=SEP=79 09:47 1636 MARK INSTRUCTION TEST = N:C=111 SEQ 0227 
12294 
5344 044026 000410 BR TST637 ;:GO TO SCOPE EXIT 
12297 044030 020504 9$: CMP R5,R4 ;DID MARK RESTORE OLD R5 
12298 044032 001405 BEQ 10$ iBR IF YES 
12300 044034 010637 001074 MOV SP, @#SREG5 ;SAVE BAD SP FOR PRINTING 
12301 044040 010503 MOV R5,R3 ;WAS DEST 
12302 044042 010206 MOV R2,SP RESET SP 
ise 044044 104004 ERROR 4 ;MARK FAILED TO RESET R5 
isene 044046 010206 10$: MOV R2,SP RESET SP 
12307 DOA CIID ISIOIIIIOIISIOIUIUIUIIOIOIIIDIISIOIOIIIUIOIIIUIUIDIIIOIUIUIIDIIUIUIOE foil t 
12308 :*TEST 637 BASIC LINE CLOCK RESPONSE TEST 
12309 DOP IIOIIIIUIIUIDIOIIIOIOIIDIOIUIDIOIIUIDIOIIUIDIDIOIDIOIUIDIOIIUIDIDIUIOIDINIDIDIDIDIDIDI IID 
12310 044050 TST637: 
12311 044050 000004 SCOPE pee THE he LOOP UTILITY 
12312 044052 012700 000637 MOV #637 ,RO OAD RO WITH TEST NUMBER 
12313 044056 013701 044106 MOV a42$,R1 ‘ioaD R1 WITH TEST INSTRUCTION WORD 
12314 044062 010605 MOV SP.R5 ; SAVE SP 
12315 044064 012702 177546 MOV #LKCSR,R2 :(R2] = LINE CLOCK ADDRESS 
12316 044070 010737 001010 MOV PC, a#$LPERR ;SET ERROR LOOP ADDRESS 
12317 044074 010506 1$: MOV R5,SP ;RESET SP FOR ERROR LOOP 
12318 044076 012737 044112 000004 MOV A4$ ,aas ;GO TO 4$ IF BUS TIMEOUT 
igen 044104 000257 ccc SCOPE SYNC 
S55 044106 005712 e$: TST (R2) ;REFERENCE LKCSR ADDR 
\Segz 044110 000404 BR 6$ :GO TO EXIT 
12325 044112 012737 061224 000004 4$: MOV #BERR , a4 ;RESTGRE TIMEOUT VECTOR 
\cese 0441206 104006 3$: ERROR 6 ;LKCSR FAILED TO RESPOND 
12328 044122 010506 6$: MOV R5,SP RESET SP 
pti 44 044124 012737 061224 000004 MOV BERR , 044 sRESTORE TIMEOUT VECTOR 
12331 DDI OIIIOIIIIUIOIIIDIIOIIIIUIDIDIOUIIUIOIIOIUIIIOIUIUIOIUIOOIDIIUIUIIIOIUIIDIOIUIOIOII IOI tt 
12332 :*TEST 640 LINE CLOCK TEST = LKCSR BIT 7 SET 
12333 CII IOISIOIIIOIIOIOIIDISIOIUIOIUIDIUIOIIDIUIIOIIOIUIOIUIDIDIOIIUIUIOIUIUIOIIUIIOIIOIUO IOI 
12334 044132 TST640: 
12335 044132 000004 SCOPE 7 CALL THE SCOPE LOOP UTILITY 
12336 044134 012700 000640 MOV #640,R0 ;LOAD RO WITH TEST NUMBER 
12337 044140 013701 044156 MOV a#2$,R1 : LOAD R1 WITH TEST INSTRUCTION WORD 
12338 044144 012702 177546 MOV #LKCSR,R2 :DEST ADDR = 177546 
12339 044150 012704 000200 MOV #200,R4 :CLKCSRJ] S / B = 200 
12340 044154 000257 CCC SCOPE SYNC 
c 
lems 044156 030412 2$: BIT R4,(R2) ; TEST BIT 7 IN LKCSR 
iSece 044160 001002 BNE TST641 ;;BR IF IT*S SET 
12346 044162 011203 MOV (R2) ,R3 ;GET WAS DATA 
ts 44 044164 104001 3$: ERROR 1 ;BIT 7 NOT SET IN LKCSR 


12349 LTR R EERE ARAEREE EERE A eRe Ree 
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CQKDAE .P11 17=SEP- : 1641 LINE CLOCK TEST = LKCSR BIT 6 CLEAR 
:*TEST 641 LINE CLOCK TEST = LKCSR BIT 6 CLEAR 


Wee eee eee RERRERRRRRE RR RR SRR RASA RRR ERR A RRR RE SSSR RRR RSE SERS SE ES 


1$1641: 


#KCSR R2 

#200,R 
032712 : #100, (R2) 
001402 TST642 


011203 MOV (R2) ,R3 
104001 3$: ERROR 1 


: CALL THE SCOPE LOOP UTILITY 
;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 

:R2 POINTS TO LKCSR 

tg: S/B= 

; SCOPE SYNC 


;TEST BIT 6 IN LKCSR 
;;BR IF CLEAR 


;GET WAS DATA 
;BIT 6 CINTR. ENAB.) IN LKCSR WAS SET 


RRR REE ERE REE EEE KER EAKEKEEEAEKEEEEEAKEREREEEREREEKREKEEREEE 


S*TEST 642 LINE CLOCK TEST = LKCSR BIT 6 SET 


RRR EERE RAKE KEE EERE ERE ERE KERR AREAKEREREAREERKEKEKEEEERKEE AREER EH 


$1642: 


000642 MOV #642 ,RO 
044302 a42$,R1 


SP,R5 
177546 ALKCSR,R2 
000300 #300 ,R4 
001010 PC ,@#$LPERR 


044316 000100 : #4$ ,a4#100 
#340 ,a4#102 


R5,SP 
#340, a4PSW 


000340 000102 
000340 177776 


052712 000100 : #100, (R2) 


020412 R4,(R2) 
001402 4$ 


011203 (R2) ,R3 
104001 : 1 


#102,a4100 
10 


a4 
#100, (R2) 
5.SP 


2 CALL THE SCOPE LOOP UTILITY 

;;LOAD RO WITH TEST NUMBER 

:LOAD R1 WITH TEST INSTRUCTION WORD 
SAVE SP 

:R2 POINTS TO LKCSR 


:CLKCSR] S / B = 300 


2 SET ERROR LOOP ADDRESS 

;SET UP LCLK VECTOR IN CASE LOGIC 
[FAULT CAUSES ATL INTERRUPT 
[RESET SP FOR ERROR 


LOOP 
[SET PRIORITY TO LEVEL 7 
SCOPE SYNC 


;SET BIT 6 IN LKCSR 

sRESULT CORRECT? 

;BR IF YES 

:GET WAS DATA 

;BIT 6 FAILED TO SET IN LKCSR 

RESTORE TRAP CATCHER IN LINE CLOCK VECTOR 


; TURN OF LINE CLK INTR. ENAB,. 
sRESET SP 


FLERE REE EEE RARER REAR EREEEREEEREKEREERREERARE EERE ED 


ZATEST 643 LINE CLK BASIC INTERRUPT TEST 


CAAA REE EAE RAAT REREERAERAEAERETEE RR EEE 


TS1643: 


C0064 3 #643,R0 
013701 044412 a42$,R1 
010605 SP,R5 
012702 177546 #LKCSR,R2 


+t" THE SCOPE LOOP UTILITY 
OAD RO WITH TEST NUMBER 
LOAD R1 WITH TEST INSTRUCTION WORD 


SP 
:R2 POINTS TO LKCSR 


SEQ 0228 





r 
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CQKDAE .P11 17=SEP=79 09:47 1643 ~~ LINE CLK BASIC INTERRUPT TEST SEQ 0229 
12406 044356 010737 001010 MOV PC, a#$LPERR :SET ERROR LOOP ADDRESS 

12607 044362 010506 1$: MOV R5,SP ‘RESET SP FOR ERROR LOOP 

12408 044364 005004 CLR RG : INITIALIZE TIMER 

12409 044366 012737 044430 000100 MOV #4$,a4#100 :SET UP LINE CLOCK VECTOR TO TO 
12410 044374 012737 000340 000102 MOV #340,a4102 *TO 4$ WITH PROCESSOR PRIORITY = 7 
12411 044402 005012 CLR (R2) *CLEAR LKCSR 

12412 044404 005037 177776 CLR aaPSwW SET PRIORITY TO LEVEL 000 

12415 044410 000257 CCC :SCOPE SYNC 

Vas 044412 052712 000100 2$: BIS #100, (R2) ZENABLE LINE CLK INTERRUPT 

12417 044416 005304 DEC R4 WAIT FOR INTR = REPORT ERROR IF 
1018 044420 001376 BNE .-2 *R4 GOES TO 000000 

12420 044422 042712 000100 BIC #100, (R2) ; TURN OFF INTR. ENAB. 

1eeet 044426 104006 3$: ERROR 6 SLINE CLK FAILED TO INTERRUPT 
12423 044430 042712 000100 4$: BIC #100, (R2) :TURN OFF INTR. ENAB. 

12424 044434 012737 000102 000100 MOV #102,a4100 [RESTORE TRAP CATCHER IN LINE CLK VECTOR 
12425 044442 005037 000102 CLR ar102 

12426 044446 010506 MOV R5,SP :RESET SP 

12407 044450 005037 177776 CLR aA“PSw “RESET PRIORITY TO LEVEL 0 

15459 FD I Be Re eK BT AIT IT IIT SIT IRR EEE ERE ER ERR EER RH 

T*TEST 644 RESET TEST - N:C = 1111 

12431 CDI IOIIOI I IOIIIOIIIOIIOIDIOIIOIOIOIOIOIOIOIOIOIOIUIIOIOIUIOIOIIOIOIOIIOIOOTI OOOO TOIT 
12432 044454 157644: 

12433 044454 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 

12434 044456 012700 000644 MOV #644 ,RO :LOAD RO WITH TEST 

12435 044462 013701 044514 MOV a2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
12436 044466 012737 000001 001110 MOV #1, a4$STIMES NO ITERATIONS ON THIS TEST 

12437 044474 012702 177564 MOV AXCSR,R2 “RD POINTS TO DL11 XCSR 

12438 044500 012737 000340 177776 MOV #340, a#PSW SMAKE PRTY. BITS ALL 1°S 

12439 044506 052712 000004 BIS #4, (R2) :SET THE DL11 MAINT. BIT 

12440 044512 000277 SCC N:C = 1111 

1ea42 044514 000005 23: RESET :TEST THE RESET - IT SHOULD CLEAR THE DL11 MAINT BIT 
12444 044516 013705 177776 MOV aePSwW.RS :SAVE THE PSW 

12445 044522 032712 000004 BIT #4, (R2) :DID MAINT. BIT CLEAR ?? 

12646 044526 007403 BEQ 4$ ‘BR IF YES 

12448 044530 042712 000004 BIC #4, (R2) MAKE SURE TO TURN OFF MAINT. BIT 
12649 044534 104006 3$: ERROR 6 “RESET FAILED TO CLEAR MAINT BIT 
12451 044536 022705 000357 4$: CMP #357,R5 :DID RESET ALTER THE PSW ?? 

12452 044542 001406 BEQ 6$ ‘BR IF NOT 

12454 064544 012704 000357 MOV #357,R4 7(R4] = S/B PSW 

12455 044550 010503 MOV R5,R3 :[R3) = WAS PSW 

12456 044552 012702 177776 MOV APSW,R2 :DEST = 

12457 044556 104001 S$: ERROR 1 SRESET AL TERED THE PSW 

12459 044560 905037 177776 6$: CLR aaPSw :CLEAR OUT THE PSW 

12660 044564 042737 000004 177564 BIC #4, aAXCSR “MAKE SURE MAINT BIT IS OFF 
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CQKDA~E rs, BASIC LOGIC TE 

CQKDAE .P11 17=SEP=79 09:47 1645 RESET TEST = N:C = 0000 SEQ 0230 
12462 ap gr rt paren rs einen ping cena tetanus 
12463 *TEST 645 RESET TEST = N:C = 0000 

12464 DOI IIOIIIUIIIOIDIOIIIIIOIOIOIIIIIIIIOUIOIIUIOIIIIIUIIUIOIIIDIDIOIUIOIIUIUIOIIUIUIIOIOIOI IO 
12465 044572 TST645: 

12466 044572 000004 SCOPE nn THE SCOPE LOOP UTILITY 
12467 044574 012700 000645 MOV #645 ,RO OAD RO WITH TEST NUMBER 

124668 044600 013701 044630 MOV a#2$,R1 ‘ioaD R1 WITH TEST INSTRUCTION WCRD 
12469 044604 012737 000001 001110 MOV #1, Q@ASTIMES NO ITERATIONS ON THIS TEST 

12470 044612 012702 177564 MOV #XCSR,R2 iR2 ag ik TO DL11 XCSR 

12471 044616 005037 177776 CLR arPswW MAKE PR BITS ALL 0°S 

12472 044622 052712 000004 BIS #4,(R2) iSET THE Mak MAINT. BIT 

: on 044626 000257 ccc 3N:C = 0000 

ae 044630 000005 2$: RESET 7 TEST THE RESET = IT SHOULD CLEAR THE DL117 MAINT BIT 
12677 044632 013705 177776 MOV @4PSwW.R5 7 SAVE THE PSW 

12478 044636 032712 000004 BIT #4,(R2) D1 D MAINT. BIT CLEAR ?? 

Ls are 044642 001403 BEQ 4$ :BR IF YES 

12481 044644 042712 000004 BIC #4,(R2) MAKE SURE TO TURN OFF MAINT. BIT 
iseat 044650 104006 3$: ERROR 6 “RESET FAILED TO CLEAR MAINT BIT 
12484 044652 022705 000000 4$: CMP #0,R5 :DID RESET ALTER THE PSW ?? 

ine 044656 001406 BEQ 6$ ;BR IF NOT 

12487 044660 012704 000357 MOV #357,R4 ;CR4] = S/B PSwW 

12488 044664 010503 MOV R5,R3 CRS] = WAS PSw 

12489 044666 012702 177776 MOV #PSW,R2 :DEST = 

ier 044672 104001 5$: ERROR 1 ;RESET AL TERED THE PSW 

12492 044674 005037 177776 6$: CLR aAPSwW 2 OUT THE PSW 

Fahd 044700 042737 000004 177564 BIC #4 ,QAXCSR MAKE SURE MAINT BIT IS OFF 

12495 J een tp elite rntergine geese egies alata eae 
12496 i *TEST 646 WAIT INSTRUCTION TEST - CPSW] = 151 

12497 oe Re Be fe fe eR Re eH BT Te Tr Te TT TTT TOT TT REE ERE RRR REE RE 
12498 044706 181646: 

12499 044706 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
12500 044710 012700 000646 MOV #646,RO0 > LOAD RO WITH TEST NUMBER 

12501 044714 013701 045002 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
12502 044720 010605 MOV SP,R5 >SAVE THE SP 

12503 044722 010737 001010 MOV PC ,@#S$LPERR SET ERROR LOOP ADDRESS 

12504 044726 012702 177564 1$: MOV #XCSR,R2 zR2 POINT TO DL11 XCSR 

12505 044732 012737 045020 000064 MOV H4$ ,a#64 :GO TO 4$ ON DL11 INTR. 

12506 044740 012737 000200 000066 MOV #200, a#66 sAT LEVEL 4 

12507 044746 010506 MOV RS,SP ;RESET SP FOR ERROR LOOP 

12508 044750 005012 CLR (Re) > INIT DL11_ XCSR 

isaup 044752 005003 CLR R3 INIT TIMER 

12511 044754 105712 3$: TSTB (R2) 7DL11 MMIT READY SET ?? 

12512 044756 100403 BMI 5$ ; IF YES 

12513 044760 005303 DEC R3 ;COUNT THE TIMER 

12514 044762 001374 BNE 3$ ;BR IF NO TIMEOUT 

eat? 044764 000440 BR 9$ :GO REPORT TIMEOUT 

12517 064766 012737 000140 177776 S$: MOV #140, a4PSwW :SET PSwW PRTY BITS TO LEVEL 3 
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CQKDAE .P11 17-SEP-79 09:47 T1646 WAIT INSTRUCTION TEST = (CPSwW] = 151 SEQ 0231 
12518 044774 000277 scc 3N:C=1111 

ise? 044776 152712 000100 BISB #100, (R2) ENAB. DL11 INTR = N:C=1001 

\g36) 045002 000001 2$: WAIT ;TEST THE WAIT-GO TO 4$ ON INTR 
12523 045004 012737 000340 177776 MOV #340, a4PSW ;LOCK OUT INTR 

12524 045012 005012 CLR (R2) ; TURN OFF DL11 INTR ENAB 

12525 045014 104006 ERROR 6 ;WAIT FAILED TO EXECUTE PROPERLY 
1s2e8 045016 000424 BR 8$ 3;GO EXIT THIS TEST 

12528 045020 042712 000100 4$: BIC #100, (R2) ; TURN OFF DL11 INTR ENAB 

12529 045024 022716 045004 CMP M#2$+2, (SP) ;DID WAIT GET FETCHED ?? 

isoey 045030 001402 BEQ 6$ ;BR IF YES 

12532 045032 104006 ERROR 6 ;WAIT NOT FETCHED PROPERLY 

1S33? 045034 000415 BR 8$ ;GO EXIT THE TEST 

12535 045036 022766 000151 000002 6$: CMP #151,2<SP) ;DID ‘WAIT’' ALTER THE PSW ?? 
ies 045044 001411 BEQ 8$ ;BR IF YES 

12538 045046 012704 000151 MOV #151,R4 7CR4] = S/B PSW 

12539 045052 016603 000002 MOV 2(SP) ,R3 ast: = WAS PSW 

12540 045056 012702 177776 MOV #PSwW,R2 ;DEST = PSW 

12541 045062 104001 7$: ERROR 1 PEAT" ALTERED THE PSW 

st 4 045064 000401 BR 8$ ;GOT TO EXIT TEST 

sore 045066 104006 9$: ERROR 6 ;DL11 FAILED TO SET READY ON TIME 
12546 045070 010506 8$: MOV R5.SP ;RESET THE SP 

12547 045072 005037 177776 CLR avPSw ;CLEAR OUT THE PSW 

12548 045076 005012 CLR (R2) ; TURN OFF Dill INTR 

12549 045100 012737 000066 000064 MOV #66 , a464 SRESTORE DLi1 VECTOR WITH TRAPCATCHER 
1s230 045106 005037 000066 CLR av66 

12552 Largan igang otra tap earceat alae 
12553 S*TEST 647 WAIT INSTRUCTION TEST = CPSWJ = 010 

12554 eR ERE EERE REAR KEE 
12555 045112 751647: 

12556 045112 000004 SCOPE om THE SCOPE LOOP UTILITY 
12557 045114 012700 000647 MOV #647 ,RO OAD RO WITH TEST NUMBER 

12558 045120 013701 045204 MOV a#2$ Rl ‘iOAD R1 WITH TEST INSTRUCTION WORD 
12559 045124 010605 MOV SP,R5 [SAVE THE SP 

12560 045126 010737 001010 MOV PC ,@#$LPERR ;SET ERROR LOOP ADDRESS 

12561 045132 012702 177564 1$: MOV #XCSR,R2 R2 POINT TO DL11 XCSR 

12562 045136 012737 045222 000064 MOV #4$ , 0464 :GO TO 4$ ON DL11 INTR. 

12563 045144 012737 000200 000066 MOV #200, 0466 TAT LEVEL 4 

12564 045152 010506 MOV R5,SP [RESET SP FOR ERROR LOOP 

12565 045154 005012 CLR (R2) SINIT DL11 XCSR 

ico 045156 005003 CLR R3 : INIT TIMER 

12568 045160 105712 3$: TSTB (R2) 3DL11 XMIT READY SET ?? 

12569 045162 100403 BM! 5$ SBR IF YES 

12570 045164 005303 DEC R3 : COUNT THE TIMER 

12571 045166 001374 BNE 3$ ‘BR IF NO TIMEOUT 

12572 045170 000437 BR 9$ *GO REPORT TIMEOUT 


ama 
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DAE .P11 17-SEP-79 09:47 1647 WAIT INSTRUCTION TEST = CPSW] = 010 SEQ 0232 


005037 177776 5$: aFPSw ;SET PSW PRTY BITS TO LEVEL 0 
000257 3N:C=0000 


152712 #100, (R2) *ENAB. DL11 INTR = N:C=1000 
000001 28: TEST THE WAIT-GO TO 4$ ON INTR 


012737 177776 #340 ,a4PSW ;LOCK OUT INTR 
(R2) ; TURN OFF DL11 INTR ENAB 
6 [WAIT FAILED TO EXECUTE PROPERLY 
8$ :GO EXIT THIS TEST 


#100. (R2) ;TURN OFF DL11 INTR ENAB 
#2$+2, (SP) ‘DID WAIT GET FETCHED ?? 
6$ ‘BR IF YES 


6 ;WAIT NOT FETCHED PROPERLY 
8$ ;GO EXIT THE TEST 


000010 : #010,2(SP) DID ‘WAIT’ ALTER THE PSW ?? 
8$ BR IF NO 


000010 #010,R4 3CR4] = S/B PSwW 
000002 2(SP) ,R3 ;CR3] = WAS PSW 
177776 MOV #PSW.R2 :DEST = PSW 
1 "WAIT" AL TERED THE PSW 
8$ :GOT TO EXiT TEST 


6 ;DL11 FAILED TO SET READY ON TIME 


: R5,SP ;RESET THE SP 
177776 aAPSW ;CLEAR OUT THE a A 
(R2) TURN OFF DL11 IN 
000066 #66 , W464 SRESTORE DL11 VECTOR WITH TRAPCATCHER 
000066 a766 


J LAA ERR EERE ERE ERE 


S*TEST 650 BR PRIORITY ARBITRATION TEST = LEVEL 1 USING LINE CLK 


PEAR RAE AERA AREER EERE AEKREAEREERREEKEEEEH 


151650: 
;CALL THE SCOPE LOOP UTILITY 
#650, me 77LOAD RO WITH TEST NUMBER 
y¥tt ;LOAD R1 WITH TEST INSTRUCTION WORD 
7SAVE THE SP 
BC. “AYSLPERR : SET ERROR LOOP ADDRESS 
: ALKCSR, R2 zR2 POINTS TO LINE CLK CSR 
000100 100 [IF INTR OCCURS - GO TO 4$ 
000102 :WITH CPU PRIORITY AT LEVEL 7 
R5,SP RESET SP FOR oe LOOPING 
RS : INITIALIZE R4 AS TIMER 
177776 #40, a4PSwW ‘SET CPU PRIORITY TO LEVEL 1 
;SCOPE SYNC 


052712 ; #100, (R2) ENABLE LINE CLK INTERRUPTS 


005 304 RG ;COUNT THE TIMER = LCLK <—¥ PREVENT 
001376 oe TIMER FROM GETTING BACK TO 000000 





N 2 
STS MACY11 30A(1052) 17=SEP=79 09:55 PAGE 234 


CQKDA=£ RS hha BASIC LOGIC TE 

CQKDAE .P 17-SEP-79 09:47 7650 BR PRIORITY ARBITRATION TEST = LEVEL 1 USING LINE CLK SEQ 0233 
12630 

12631 045400 042712 000100 BIC #100, (R2) ; TURN OFF THE INTERRUPT ENABLE 

12632 045404 104006 3$: ERROR 6 ;LINE CLK FAILED TO INTR AT LEVEL 1 


3 
12634 045496 042712 000100 4$: BIC #100, (R2) ; TURN OFF INTR. ENABLE 


Nan 
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17-SEP-79 09:4 7650 PRIORITY ARBITRATION TEST = LEVEL 1 USING LINE CLK SEQ 0234 
12635 045412 012737 000102 000100 MOV #102,a#100 :RESTORE TRAP CATCHER IN THE VECTOR 
12636 045420 005037 000102 CLR aioe 

12637 045424 010506 MOV R5,SP :RESET THE SP 

12638 045426 005037 177776 CLR aaPSwW “SET CPU PRIORITY BACK TO LEVEL 0 
12640 PLA RARER RARER ERE RARER EAAAARAEAAERAAARERAEREAARAEAEAEARHEREEE 
12641 S*TEST 651 BR PRIORITY ARBITRATION TEST = LEVEL 2 USING LINE CLK 
12642 FLERE AA AREER ARAAEAE ERA ARARAAAERERRERERAERERERAEEREREEHHER ED 
12643 045432 1$1651: 

12644 065432 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 

12645 045434 012700 900651 MOV #651,RO *:LOAD RO WITH TEST NUMBER 

12646 045440 013701 045506 MOV av2$.R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
12647 045444 010605 MOV SP.R :SAVE THE SP 

12648 045446 010737 001010 MOV PC; a#SLPERR >SET ERROR LOOP ADDRESS 

12649 045452 012702 177546 1$: MOV #LKCSR,R2 tR2 POINTS TO LINE CLK CSR 

12650 045456 012737 045524 000100 MOV #4$,a#100 ‘IF INTR OCCURS - GO TO 4$ 

12651 045464 012737 000340 000102 MOV #340,a4102 ‘WITH CPU PRIORITY AT LEVEL 7 

12652 045472 010506 MOV R5,SP [RESET SP FOR ERROR LOOPING 

12653 045474 005004 CLR RG ‘INITIALIZE R4 AS TIMER 

12654 045476 012737 000100 177776 MOV #100, a#PSW [SET CPU PRIORITY TO LEVEL 2 

12655 045504 000257 CCC *SCOPE SYNC 

12657 045506 052712 000100 2$: BIS #100, (R2) ZENABLE LINE CLK INTERRUPTS 

12659 045512 005304 DEC R4 :COUNT THE TIMER - LCLK SHOULD PREVENT 
12660 045514 001376 BNE .=2 ‘TIMER FROM GETTING BACK TO 000000 
12662 045516 042712 000100 BIC #100, (R2) : TURN OFF THE INTERRUPT ENABLE 
12663 045522 104006 3$: ERROR 6 “LINE CLK FAILED TO INTR AT LEVEL 2 
12665 045524 042712 000100 4$: BIC #100, (R2) : TURN OFF INTR. ENABLE 

12666 045530 012737 000102 000100 MOV #102,a4100 “RESTORE TRAP CATCHER IN THE VECTOR 
12667 045536 005037 000102 CLR a#102 

12668 045542 010506 MOV R5S,SP :RESET THE SP 

12669 045544 005037 177776 CLR aaPSw ‘SET CPU PRIORITY BACK TO LEVEL 0 
12671 DDI RT RR RRR EERE REE E EERE REE REE Re 
12672 S*TEST 652 BR PRIORITY ARBITRATION TEST - LEVEL 3 USING LINE CLK 
12673 STARR RRR EERE EERE EERE REE EREREEERREREREEE EE 
12674 045550 781652: 

12675 045550 090004 SCOPE :CALL THE SCOPE LOOP UTILITY 

12676 045552 012700 000652 MOV #652.RO OAD RO WITH TEST NUMBER 

12677 045556 013701 045624 MOV a#2$.R1 Ahoy R1 WITH TEST INSTRUCTION WORD 
12678 045562 010605 MOV SP.R5 *SAVE THE SP 

12679 045564 010737 001010 MOV PC; @#SLPERR ‘SET ERROR LOOP ADDRESS 

2680 045570 012702 177546 1$: MOV ALKCSR,R2 :R2 POINTS TO LINE CLK CSR 

12681 045574 012737 045642 000100 MOV #4$,a7100 [IF INTR OCCURS - GO TO 4$ 

12682 045602 012737 000340 000102 MOV #340,a#102 ‘WITH CPU PRIORITY AT LEVEL 7 

12683 045610 010506 MOV RS,SP “RESET SP FOR ERROR LOOPING 

12684 045612 005004 CLR RG S INITIALIZE R4 AS TIMER 

12685 045614 012737 000140 177776 MOV #140, a4PSw SSET CPU PRIORITY TO LEVEL 3 

12686 045622 000257 CCC :SCOPE SYNC 

12688 045624 052712 090100 2$: BIS #100, (R2) sENABLE LINE CLK INTERRUPTS 


12690 045630 005304 DEC RS ; COUNT THE TIMER = LCLK SHOULD PREVENT 
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CQKDAE .P11 17=-SEP p-55 09:47 T652 BR PRIORITY ARBITRATION TEST = LEVEL 3 USING LINE CLK SEQ 0235 
1} 045632 001376 BNE 72 ; TIMER FROM GETTING BACK TO 000000 
12693 045634 042712 000100 BIC #100, (R2) ; TURN OFF THE INTERRUPT ENABLE 
‘sae 045640 104006 3$: ERROR 6 ZLINE CLK FAILED TO INTR AT LEVEL 3 
12696 045642 042712 000100 4$: BIC #100, (R2) ;TURN OFF INTR. ENABLE 

12697 045646 012737 000102 000100 MOV #102,a4100 sRESTORE TRAP CATCHER IN THE VECTOR 
12698 045654 005037 000102 CLR awi02 

12699 045660 010506 MOV R5,SP sRESET THE SP 

a 045662 005037 177776 CLR a4PSW ;SET CPU PRIORITY BACK TO LEVEL 0 
12702 RT RT TT RT Re BRI I TTT TOTTI TORK RRR REE EKER EERE KEE 
12703 Se TEST 653 BR PRIORITY ARBITRATION TEST - LEVEL 4 USING LINE CLK 
12704 © eRe Be Te Be He We i Be a Se SR i Te Bi Ti eS Te RT TT i IR 
12705 045666 1S1653: 

12706 045666 000004 SCOPE ;CALL THE SCOPE Rs UTILITY 

12707 045670 012700 000653 MOV #653,R0 ;;LOAD RO WITH TEST NUMBER 

12708 045674 013701 045742 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
12709 045700 010605 MOV sP.R5 ZSAVE THE SP 

12710 045702 010737 001010 MOV PC ,@4$LPERR SET ERROR LOOP ADDRESS 

12711 045706 012702 177546 1$: MOV MLKCSR,R2 :R2 POINTS TO LINE us CSR 

12712 045712 012737 045760 000100 MOV #4$ 04100 :1F INTR OCCURS - GO TO 4$ 

12713 045720 012737 000340 000102 MOV #340,a4102 ‘WITH CPU PRIORITY AT TPEVEL 7 

12714 045726 010506 MOV R5,SP SRESET SP FOR ERROR LOOPING 

12715 045730 005004 CLR R4 : INITIALIZE R4 AS TIMER 

12716 045732 012737 000200 177776 MOV #200, a4PSW sSET CPU PRIORITY TO LEVEL 4 

if dat 4 045740 000257 ccc :SCOPE SYNC 

tak 045742 052712 000100 2$: BIS #100, (R2) ;ENABLE LINE CLK INTERRUPTS 

12721 045746 005304 DEC RG ;COUNT THE TIMER ~ LCLK SHOULD PREVENT 
13756 045750 001376 BNE 72 ; TIMER FROM GETTING BACK TO 000000 

c 

12724 045752 042712 000100 BIC #100, (R2) ; TURN OFF THE INTERRUPT ENABLE 
fief 045756 104006 3$: ERROR 6 ;LINE CLK FAILED TO INTR AT LEVEL 4 
12727 045760 042712 000100 4$: BIC #100, (R2) ; TURN OFF INTR. ENABLE 

12728 045764 012737 000102 000100 MOV #102,a4100 [RESTORE TRAP CATCHER IN THE VECTOR 
12729 045772 005037 000102 CLR a#02 

12730 045776 010506 MOV R5,SP ;RESET THE SP 

teres 046000 005037 177776 CLR aArPsSw :SET CPU PRIORITY BACK TO LEVEL 0 
12733 DOI IIIIISIIIOIIOIIIIOIIIIIOIOIUIOIOIOIIIUIIUIIOIIOIIOIIIUIIO TOUR Tot i kik i tt 
12734 S*TEST 654 BR PRIORITY ARBITRATION TEST - LEVEL 5 USING LINE CLK 
1273 DAI IIOIOIISIIIIIOIDIOIIIIDIOIUIUIUIIIOIIOIOIDIDIIIOIIIOIUIOIIOIUIOIIOIUIIUIUIDIIOOIOI IDE 
12736 046004 TST654: 

12737 046004 000004 SCOPE : CALL THE SCOPE LOOP UTILITY 

12738 04 012700 000654 MOV #654 ,R0 ;LOAD RO WITH TEST NUMBER 

12739 046012 013701 046060 MOV a#2$,R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
12740 046016 010605 MOV sP,R5 ZSAVE THE SP 

12741 0460 010737 001010 MOV PC ,@#$LPERR ;SET ERROR LOOP ADDRESS 

12742 046024 012702 177546 1$: MOV #LKCSR,R2 Re POINTS TO LINE CLK CSR 

12743 046030 012737 046076 000100 MOV #4$ 04100 7 IF INTR OCCURS - GO TO 4$ 

12744 046036 012737 000340 000102 MOV #340,a#102 ;WITH CPU PRIORITY AT LEVEL 7 

12745 046044 010506 MOV RS,SP sRESET SP FOR ERROR LOOPING 


12746 046046 005004 CLR RS : INITIALIZE R4 AS TIMER 
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012737 
000257 


052712 


000004 
012700 
013701 


032737 
001401 
000000 


052712 


005304 
001376 
000403 
042712 
104006 


000240 


000100 


000100 
000100 
000102 
000102 


177776 


177776 


177776 


000100 


063240 


000100 
000102 


177776 
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7654 BR PRIORITY ARBITRATION TEST = LEVEL 5 USING LINE CLK 


MOV 
ccc 


2$: BIS 


3$: ERROR 


4$: BIC 
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#240 , QAP SW 


#100, (R2) 


RS 
“~ 


#100, (R2) 
6 

#100, (R2) 
#102,a4100 
a#102 


R5,SP 
avPSwW 


SEQ 0236 


SET CPU PRIORITY TO LEVEL 5 
SCOPE SYNC 


ENABLE LINE CLK INTERRUPTS 


:COUNT THE TIMER = LCLK SHOULD PREVENT 
; TIMER FROM GETTING BACK TO 000000 


TURN OFF THE INTERRUPT ENABLE 
;LINE CLK FAILED TO INTR AT LEVEL 5 


TURN OFF INTR. ENABLE 
“RESTORE TRAP CATCHER IN THE VECTOR 


RESET THE SP 
;SET CPU PRIORITY BACK TO LEVEL 0 


SEERA ERE AREKEEEEEEREEEAEEREEKREE 


BR PRIORITY ARBITRATION TEST = LEVEL 6 USING LINE CLK 


;*TEST 655 


KARR EREEEREERERKEEERAEEAEAEEREAEREKEERAEERARAAKREREEAEEEAREEEEEREKKKKK EE 


;CALL_THE SCOPE LOOP UTILITY 
;;LOAD RO WITH TEST NUMBER 


;LOAD R1 WITH TEST INSTRUCTION WORD 
on iF MOT. HALT SET ?? 


;BREAK=DEPRESS CONTINUE TO CONTINUE 
SAVE THE SP 


SET ERROR LOOP ADDRESS 

zR2 POINTS TO LINE CLK CSR 

7 IF INTR OCCURS - GO TO 4$ 
sWITH CPU PRIORITY AT LEVEL 7 
sRESET SP FOR ERROR LOOP 

s INITIALIZE R4& AS TIMER 

7SET CPU PRIORITY TO LEVEL 6 
; SCOPE SYNC 


sENABLE INTERRUPTS 


COUNT UNTIL ay A 000000 - THEN 
CONTINUE - NTERRUPT SHOULD OCCUR 
[GO TO EXIT - ALL OK 


TURN OFF THE INTR ENABLE 
: INTR OCCURRED WITH CPU AT LEVEL 6 


TURN OFF INTR ENABLE 
RESET THE TRAP CATCHER IN THE VECTOR 


RESET SP JUST IN CASE 


181655: 
SCOPE 
MOV #655, os 
MOV av 
- SBTTL a CONTROLLED BREAKPOINT -- BIT13 
BIT #B1T13,a4BPTLOC ; 
BEQ +4 
HALT 
MOV SP,.R5 
MOV PC ,@#$LPERR 
1$: MOV MLKCSR,R2 
MOV #4$ ,a4100 
MOV #340,a#102 
MOV as 
CLR R4 
MOV #300, a4PSW 
ccc 
2$: BIS #190, (R2) 
DEC R4 
BNE owe 
BR 6$ 
4$: BIC #100, (R2) 
3$: ERROR 6 
6$: BIC #100, (R2) 
MOV ore .a4100 
CiR awi0e 
MOV R5,SP 
CLR aaPSw 


;SET CPU PRIORITY BACK [O LEVEL 0 


Wnt PPR eee eR R RRR RRR RRR EERE RRR ER RRR RRR ERR RRR RRR RRR ERR RRR EE S| 


BR PRIORITY ARBITRATION TEST = LEVEL 7 USING DL11 


SPST AAAA AAA AAA AAEAA HAAR AAEARAAARAAARERAHAREHEKeREReReheeeneekeeD 


SSTEST 656 


: 2 
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CQKDAE .P11 17=SEP=79 09:47 T7656 ORITY ARBITRATION TEST = LEVEL 7 USING DL11 SEQ 0237 
12803 046625¢ TST656: 

12804 046254 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

12805 046256 012700 000656 MOV #656,R0 ;ZLOAD RO WITH TEST NUMBER 

12806 046262 013701 046330 MOV a#2$,R1 ; LOAD e WITH TEST INSTRUCTION WORD 
12807 046266 010605 MOV SP .R5 ;SAVE THE SP 

12808 046270 010737 001010 MOV af @*$LPERR ;SET ERROR LOOP ADDRESS 

12809 046274 012702 177564 1$: MOV #XCSR,R2 R2 POINTS TO DL11 XCSR 

12810 046300 012737 046342 000064 MOV #4$ 0464 7 IF INTR OCCURS = GO TO 4$ 

12811 046306 012737 000340 000066 MOV #340 ,a#66 sWITH CPU PRIORITY AT LEVEL 7 

12812 046314 010506 MOV R5,SP sRESET SP FOR a LOOP 

12813 046316 005004 CLR RS : INITIALIZE R4& AS TIMER 

12814 046320 012737 000340 177776 MOV 4340, a4PSwW ise! CPU PRIORITY TO LEVEL 7 

\ele 046326 000257 CCC SCOPE SYNC 

Hy 4 046330 052712 000100 2s: BIS #100, (R2) ;ENABLE INTERRUPTS 

12819 046334 005304 DEC R4 ;COUNT UNTIL [R4] = 000000 - THEN 
12820 046336 001376 BNE 72 ; CONTINUE - NO e “tet: SHOUL D OCCUR 
\eeSe 046340 000403 BR 6$ ;GO TO EXIT = ALL OK 

12823 046342 042712 000100 4$: BIC #100, (R2) ; TURN OFF THE INTR ENABLE 

\coSe 046346 104006 3$: ERROR 6 : INTR OCCURRED WITH CPU AT LEVEL 7 
12826 046350 042712 000100 6$: BIC #100, (R2) ; TURN OFF INTR ENABLE 

12827 046354 012737 000066 000064 MOV #66 , 464 sRESET THE TRAP CATCHER IN THE VECTOR 
12828 046362 005037 000066 CLR a466 

12829 046366 01(0506 MOV R5,SP sRESET SP JUST IN CASE 

ot 046370 005037 177776 CLR a4PSwW ;SET CPU PRIORITY BACK TO LEVEL 0 
12832 SL RR RRR REE REE EERE EEE EERE ERE EE 
12833 S*TEST 657 “CLR @4#PSW'' ALLOWS IMMEDIATE BR-8G-INTR SEQUENCE 
12834 ;THIS TEST VERIFIES THAT IF A ‘BR'* REQUEST IS PENDING WHEN A ‘CLR @APSw'' 
12835 31S EXECUTED TO LOWER THE CPU PRIORITY, THE REQUEST IS GRANTED BEFORE 
12836 s EXECUTION OF THE INSTRUCTION FOLLOWING THE ‘‘CLR’’ 

12837 SR RRR ERE REE RRR REE REE EER ER 
12838 046374 181657: 

12839 046374 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 

12840 046376 012700 000657 MOV #657,RO : LOAD RO WITH TEST NUMBER 

12841 046402 013701 046474 MOV afv2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
12842 046406 012702 177546 MOV #LKCSR, R2 RD wy TO LINE CLK CSR 

12843 046412 010605 } MOV SP.R5 SAVE THE SP 

12844 046414 010737 001010 MOV PC ,@#$LPERR ;SET ERROR LOOP ADDRESS 

12845 046420 012737 046502 000100 1$: MOV #4$, a#100 ;SET UP LCLK VECTOR TO GO TO 4$ 
12846 046426 012737 000300 000102 MOV #300, a#102 

12847 046434 010506 MOV R5,SP sRESET THE SP FOR ERROR LOOPING 
12848 046436 005004 CLR R4 Z INITIALIZE TIMER FO Kw 

12849 046440 005003 CLR R3 :CLEAR SOFTWARE FLAG 

12850 046442 012737 000340 177776 MOV #340, a4PSW ;LOCK OUT ALL INTRS 

12851 046450 052712 000100 BIS #100, (R2) ;ENABLE LCLK INTRS 

12852 046454 042712 000200 BIC #200, (R2) ;CLEAR LINE CLOCK READY 

12853 046460 105712 11$: TSTB (R2) :LCLK READY TO INTR ?? 

12854 046462 100403 BM! 12$ :BR IF YES 

12855 046464 005304 DEC RS ; COUNT THE TIMER 

12856 046466 001374 BNE 11$ [BR IF NO TIMEOUT 

12857 046470 000411 BR 6$ ;GO REPORT TIMEOUT 


12858 046472 000257 12$: CCC :SCOPE SYNC 
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CQKDAE .P11 17=SEP=79 09:47 1657 "CLR @APSW'' ALLOWS IMMEDIATE BR-BG-INTR SEQUENCE SEO 0238 
12859 

12860 046474 005037 177776 es: CLR a4PSwW ;ALLOW INTRS = LCLK SHOULD INTERRUPT 
12861 ;BEFORE FETCHING NEXT INSTRUCTION 
12862 046500 005103 COM R3 ;SHOULD NOT BE FETCHED 

12863 046502 005012 4$: CLR (R2) ;DISABLE THE LCLK INTR 

12864 0464504 005703 TST R3 ;DID SOFTWARE FLAG GET = ?? 
12865 046506 001404 BEQ 8$ ;BR IF NOT - IT WORKED 

12866 046510 104006 3$: ERROR 6 ;LCLK FAILED TO INTR ONT IME 

ef 046512 000402 BR 8$ [GO EXIT 

12869 046514 005012 6$: CLR (R2) :DISABLE LCLK INTR 

1eeee 046516 104006 5$: ERROR 6 sLINE CLK TIMED OUT 

12872 046520 010506 8$: MOV R5,SP ;RESET THE SP 

12873 046522 012737 000102 000100 MOV #102,a4100 ZRESTORE THE LINE CLK TRAPCATCHER 
isn 046530 005037 000102 CLR a#102 

12876 DORIS IOIIIOIUISIIDIIIIOIIIUIUISIUIOIIOIIOIIOIUIOIOIOINIOIOIIUIOIIOIUIDIOUINIOIE UI On tt 
12877 i*TEST 660 "BR6 VS BR4'' PRIORITY ARBITRATION TEST 

12878 ; THIS TEST VERIFIES THAT IF BOTH A ‘'BR4'' AND A ‘'BR6'* REQUEST ARE 
12879 sPENDING WHEN THE CPU PRIORITY IS LOWERED TO ALLOW INTRS. THAT ‘BR6"' 
12880 ;REQUEST IS GRANTED FIRST EVEN THOUGH THE ‘BR4'* REQUEST MAY HAVE 
12881 ;OCCURRED FIRST 

12882 LL RARER EERE REE RRR EERE RR ERR RRR Rete 
12883 046534 TST660: 

12884 046534 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
12885 046536 012700 000660 MOV #660 ,RO ;7;LOAD RO WITH TEST NUMBER 

12886 046542 013701 046702 MOV a#2$.A1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
12887 046546 010605 MOV SP,R5 :SAVE THE SP 

12888 046550 010737 001010 MOV PC ,@#$LPERR ;SET ERROR LOOP ADDRESS 

12889 046554 012702 177546 MOV ALKCSR,R2 zR2 POINTS TO LINE CLK CSR 

12890 046560 012703 177564 MOV #XCSR,R3 3R3 POINTS TO DL11 XCSR 

12891 046564 012737 046712 000100 MOV #4$, a#100 :SET UP THE LCLK VECTOR = GO TO 4$% 
12892 046572 012737 000300 000102 MOV #300,a#102 

12893 046600 012737 046744 000064 MOV #BS , aN64 ;SET UP THE DL11 VECTOR - GO TO 8$ 
12894 046606 012737 000200 000066 MOV #200 ,a#66 

12895 046614 010506 MOV R5,SP sRESET SP FOR ERROR LOOPING 

12896 046616 012737 000340 177776 MOV #340, a4PSW ;LOCK OUT ALL INTRS 

12897 046624 005037 063316 CLR a4MBUF 0 sINIT TIMER 

12898 046630 005037 063322 CLR @4MBUF 1 [CLEAR DL11 INTR FLAG 

12899 046634 005004 CLR RS ; INIT TIMER 

12900 046636 052713 000100 BIS #100, (R3) ENABLE DL11 XMIT INTR 

12901 046642 105713 118: TSTB (R3) iXMIT — SET ?? 

12902 046644 100403 BMI 12$ [BR IF 

12903 6 005304 DEC RS ; COUNT THe TIMER 

12904 046650 001374 BNE 11$ ;BR IF NO TIMEOUT 

53024 046652 000443 BR 5$ ;GO REPORT TIMEOUT FOR DL11 

12907 046654 005004 12$: CLR RS ; INIT THE TIMER AGAIN 

12908 046656 052712 000100 BIS #100, (R2) [ENABLE LCLK INTRS 

12909 046662 042712 000200 BIC #200, (R2) : CLEAR THE LINE CLOCK READY BIT 
12910 046666 105712 13$: TSTB (R2) ;LCLK READY TO IN 

12911 046670 100403 BM! 14$ ‘BR IF YES 

12912 046672 005304 DEC RG > COUNT THE TIMER 

12913 046674 001374 BNE 13$ 


:BR IF NO TIMEOUT 
12914 046676 000436 BR 7$ :GO REPORT LINE CL« TIMEQU; 


3 
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‘Sole 046700 000257 14%: ccc ; SCOPE SYNC 
ib +44 046702 005037 177776 2$: CLR aAPSW ;ALLOW INTRS = KW SHOULD INTR FIRST 
12919 046706 005137 063316 COM @AMBUF 0 ;SET SOFTWARE FLAG IF FETCHED 
12920 046712 005013 4$: CLR (R3) DISABLE BOTH INTERRUPTS 
12921 046714 005012 CLR (R2) 
12922 046716 005737 063316 TST @AMBUF 0 ;DID SOFTWARE FLAG GET SET ?? 
iSuez 046722 001402 BEQ 6$ ;BR IF NOT 
12925 046724 104006 3$: ERROR 6 ZLINE CLK INTR OCCURRED TOO LATE 
1a 046726 000425 BR 9$ ;GO TO EXIT 
12928 046730 005737 063322 6$: TS7 @AMBUF 1 ;DID DL11 SOFTWARE FLAG SET ?? 
1D 046734 001422 BEQ 9$ ;BR IF NOT 
12931 046736 0i0302 MOV R3,R2 sFOR CORRECT DESTINATION TYPOUT 
12932 046740 104006 ERROR 6 3DL11 INTERRUPTED THE KW11 
sey 046742 000417 BR 9$ :GO TO EXIT TEST 
12935 046744 005137 063322 8$: COM aAMBUF 1 sFLAG THE DL11 INTR 
12936 046750 005013 CLR (R3) ;DISABLE BOTH INTR ENABLES 
12937 046752 005012 CLR (R2) 
12938 046754 010302 MOV R3,R2 sFOR CORRECT DESTINATION TYPOUT 
12939 046756 104006 ERROR 6 3DL11 SHOULD NOT HAVE INTERRUPTED 
‘Soet 046760 000410 BR 9$ :GO EXIT TEST 
12942 046762 005012 5$: CLR (R2) ;DISABLE THE INTR ENABLES 
12943 046764 005013 CLR (R3) * 
12944 046766 010302 MOV R3,R2 7FOR CORRECT DESTINATION TYPOU'T 
12945 046770 104006 ERROR 6 3DL11 TIMEOUT 
1x 046772 000403 BR i) } 3GO TO EXIT 
12948 046774 005012 7$: CLR (R2) ;DISABLE INTR ENABLES 
12949 046776 005013 CLR (R3) 
12950 047000 104006 ERROR 6 ;KW11 TIMEOUT 

! 
12952 047002 010506 9$: MOV RS,SP sRESET THE SP 
12953 047004 005037 177776 CLR arPSwW sRESET THE CPU PRIORITY 
12954 047010 012737 000102 000100 MOV #102,a410v sRESTORE LCLK VECTOR 
12955 047016 005037 000102 CLR av102 
12956 047022 012737 000066 000064 MOV #66 , a464 ;RESTORE THE DL11 XMIT VECTOR 
Ly 3424 047030 005037 000066 CLR a766 
12959 LR RRR ERE REE ERR EERE EERE EERE RR 
12960 3 ////////7///7//COMBINED INSTRUCTION EXERCISER SECTION ///////////// 
12961 DEERE ERE RRR REE EEE EEE ER EE ee 
1296, 
1S LLU EEE ERE EER ER EERE ERE REE EEE RRR 
12964 S*TEST 661 *BPT’’ TRAP LINKAGE TEST 
12965 LLU RR EERE EERE RRR E EERE RR 
12966 047034 TST661: 
12967 047034 000004 SCOPE 2 CALL THE SCOPE L our UTILITY 
12968 047036 012700 000661 MOV #661, 7 LOAD RO WITH TEST NUMBER 
12969 047042 013701 047066 MOV a#2$,R ‘TOAD R1 WITH TEST INSTRUCTION WORD 
12970 047046 010605 MOV SP, eg [SAVE THE SP 
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1$: 


2$: 


33: 
4$: 


“BPT"’ 


BPT 
ERROR 


MOV 
MOV 
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TRAP LINKAGE T 

PC ,@#$LPERR ;SET ERROR LOOP ge te 

#4$ 0414 :GO TO 4$ TRAP 

R5,SP :RESET THE SP FOR ERROR LOOPING 
SCOPE SYNC 
; TEST THE ‘BPT'' = GO TO 4$ 

5 ;BPT FAILED TO TRAP 

R5,SP RESET THE SP 

#16,a414 sRESTORE THE VECTOR 


S35 (ARR RSA SARS SESARSRASASARARSRERASAR RRS RRA RARER RRR SSSR RR RRR RRS SE SS | 


° 
7* 


TEST 662 


RED ZONE OVERFLOW TEST - MOV R,-‘SP) 


4 SAAR EEEERRERARKEERREREE ARERR REE EH 


1S 


23: 


3$: 
4S: 


5$: 
6$: 


7$: 
8$: 


T662: 


:CALL_THE SCOPE LOOP UTILITY 
NUMBER 


#662,RO +:LOAD RO WITH TEST 

aft2$.R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
SP.R5 SSAVE SP 

awe RG SSAVE T.0. VECTOR 

ar 356. R3 “SAVE VECTOR AT 336 


a4 :GO TO 4$ ON OVFLW 


miebes2 2.04336 INIT. £336] 
SP :SET SP TO CAUSE RED ZONE TRAP 
:SCOPE SYNC 
RO,-(SP) sFORCE RED ZONE TRAP - GO TO 4$ 
R4 ars :RESTORE T.0. VECTOR 
SP, a#$REGS5 7 SAVE BAD SP FOR PRINTING 
R5.SP SRESET SP FOR ERROR CALL 
5 ‘MOV FAILED TO CAUSE TRAP 
R4, a4 :RESTORE T.0. VECTOR 
#0,SP ;CSPJ=0? 
6$ “BE IF YES 
SP, @4#$REGS :SAVE BAD SP FOR PRINTING 
R5,SP sRESET SP FOR ERROR CALL 
5 :SP NOT BEING JAMMED TO 4 


#125252,04336  ;DID PUSH OCCUR IN YELLOW ZONE? 
8$ IF NOT 


SP ,a#$REGS SAVE BAD SP FOR ety 
R5,SP [RESET SP FOR ERROR CAL 

5 :MOV PUSHED INTO YELLOW. ZONE 
R3,04336 ZRESTORE VECTOR 336 

R5,SP RESET SP 


LLAMA AA AAA ARARA AA RARAAEARERAERAAEAEAAARERAAERARREKKER EKER RRR A ES 


*TEST 663 YELLOW ZONE OVERFLOW TEST - MOV R,-(SP) 
SS AACA AAAA AAA AAEEARAAAEAE ERA ARER AREER RAERRERERER RRR ERE RE ES 
TST663: 


SEQ 0240 
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000400 
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000004 
001074 
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YELLOW ZONE OVERFLOW TEST = MOV R,=(SP) 


SEQ 0241 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #663,R0 +:LOAD RO WITH TEST NUMBER 
MOV a#2$.Ri :LOAD R1 WITH TEST INSTRUCTION WORD 
MOV SP,R “SAVE SP 
MOV #376, she *R2 POINTS TO STACK 
MOV ‘SAVE T.0. VECTOR 
MOV th an :0N OVFLW = GO TO 4$ 
MOV #400,5 :SET SP TO CAUSE OVFLW 
CCC *SCOPE SYNC 
2$: MOV RO,-(SP) sFORCE STACK OVFLW - GO TO 4$ 
MOV R4 a4 :RESTORE T.0. VECTOR 
MOV SP. AASREGS “SAVE BAD SP FOR PRINTING 
MOV RS,SP SRESET SP FOR ERROR CALL 
3$: ERROR 5 ‘STACK OVFLW FAILED TO TRAP 
4$: MOV R4, ars :RESTORE T.0. VECTOR 
CMP RO. (R2) ‘DID CROJ GET PUSHED? 
BEQ 6$ “BR IF YES 
MOV SP, a#SREGS :SAVE BAD SP FOR PRINTING 
MOV 5. [RESET SP FOR ERROR CALL 
S$: ERROR 5 SMOV FAILED TO PUSH IN YELLOW ZONE 
63: TST SP : (SPJ= 0? 
BNE 8$ BR IF NOT 
MOV SP, aASREGS ;SAVE BAD SP FOR PRINT ING 
MOV R5,SP *RESET SP FOR ERROR C 
7$: ERROR 5 ‘RED ZONE INSTEAD OF veLLOw ZONE 
8$: MOV RS,SP :RESET SP 


SEERA EERE AERA REE 


S*TEST 664 YELLOW ZONE OVERFLOW TEST - (CMP RO,-(SP)) 


SEERA AERA ERA EAEEKEAEAREAEEAEAREEEAEREEREREREEA EAE REE EE 


151664: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #664,RO OAD RO WITH TEST NUMBER 
MOV av2$.R1 tiory R1 WITH TEST INSTRUCTION WORD 
MOV SP ARS | : SAVE THE SP 
MOV ans, AVE TRAP VECTOR 
MOV 44S. a :GO TO “i IF TRAP SPRUNG 
MOV #400,5 SET SP TO PUSH INTO ‘YELLOW ZONE"' 
ccc :SCOPE SYNC 
2$: CMP RO,-(SP) :TEST THE CMP = NO TRAP SHOULD OCCUR 
BR 6$ 7GO TO EXIT TEST 
4$: MOV ans :RESTORE TRAP VECTOR 
MOV SP, AASREGS “SAVE BAD SP FOR PRINTING 
MOV R5,SP :RESE THE SP 
3$: ERROR 5 “CMP CAUSED OVERFLOW TRAP 
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010437 
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047470 
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000004 
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000004 
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1664 YELLOW ZONE OVERFLOW TEST = (CMP ROQ,=-(SP)) 


6$: MOV R4 ans :RESTORE THE VECTOR 
MOV R5,SP “RESET THE SP 
: LRA E ERR A EERE RR ERE EKREE ERE EE EER EE 
S*TEST 665 YELLOW ZONE OVERFLOW TEST = (BIT RO,-(SP)) 
CLARA ARR RER EK KEREEEEKREEREEREEREEKERERRREREEKEEREEEREHRERE KE 
TST665: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #665,,RO ~;LOAD RO WITH TEST NUMBER 
MOV ar2$.R1 *LOAD R1 WITH TEST INSTRUCTION WORD 
MOV SP RD : SAVE THE SP 
MOV RG AVE TRAP VECTOR 
MOV rity a4 :GO T0 “é> IF TRAP SPRUNG 
MOV #400, SP :SET SP TO PUSH INTO ‘YELLOW ZONE'' 
CCC :SCOPE SYNC 
2$: BIT RO,-(SP) :TEST THE BIT = NO TRAP SHOULD OCCUR 
BR 6$ :GO TO EXIT TEST 
4$: MOV R4, ars :RESTORE TRAP VECTOR 
MOV SP. AA#SREGS * SAVE BAD SP FOR PRINTING 
MOV R5,SP SRESET THE SP 
3$: ERROR 5 ‘BIT CAUSED OVERFLOW TRAP 
6$: MOV R4, ans :RESTORE THE VECTOR 
MOV R5,SP “RESET THE SP 
CD REE RK E RR E EERE ERE EEE KEE ERO REE EE ER 
S*TEST 666 YELLOW ZONE OVERFLOW TEST - (TST -(SP)) 
CLEARER ERE REE EEE REE RRR KEEEER TAR RBSBAASSAASAESSLESS SLES SS | 
TST666: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #666.RO ZLOAD RO WITH TEST NUMBER 
MOV av2$.R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
MOV SP, RS *SAVE THE SP 
MOV ars, “SAVE TRAP VECTOR 
MOV #4$. om :GO TO 4$ IF TRAP SPRUNG 
MOV #400, SP ;SET SP TO PUSH INTO ‘YELLOW ZONE’ 
CCC :SCOPE SYNC 
2$: TST ~(SP) :TEST THE TST - NO TRAP SHOULD OCCUR 
BR 6$ :GO TO EXIT TEST 
4$: MOV R4, aes :RESTORE TRAP VECTOR 


MOV SP. a#$SREGS + SAVE BAD SP FOR PRINTING 


MOV R5,SP RESET THE S$ 
3$: ERROR 6 , : TST CAUSED OVERF LOw TRAP 
6$: MOV R4,a044 ;RESTORE THE VECTOR 
MOV R5,SP ;RESET THE SP 
LL E RRR R ERR RRA RATER EERE R RRR ER Ree 
*TEST 667 ODD ADDRESS ERROR TEST = SUB RA,(RB) ~ (RB) = ODD 


SAAR AAR ARERR EERE ERE AAAEAERERERRERERERKEKRRKKARRA RARER E Ree 


SEQ 0242 


on 
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13139 047600 TS1667: 

13140 047600 000004 SCOPE :CALL THE SCOPE 7b 99? UTILITY 
13141 047602 012700 000667 MOV #667,RO LOAD RO WITH TEST NUMBER 

13142 047606 013701 047642 MOV ares R1 ‘TOAD R1 WITH TEST INSTRUCTION WORD 
13143 047612 010605 MOV SP, “SAVE SP 

13144 047614 010737 001010 MOV PC, “SFSLPERR :SET ERROR LOOP ADDRESS 

13145 047620 013704 000004 1$: MOV ave R :SAVE T.0. VECTOR 

13146 047624 012737 047652 000004 MOV #4$. oes :0N ODD ADDR ERROR - GO TO 4$ 

13147 047632 010506 MOV RS, SP RESET SP FOR ERROR LOOP 

13148 047634 012702 000001 MOV #1.R2 ‘R2 GETS ODD ADDRESS 

13149 047640 000257 CCC :SCOPE SYNC 

13131 047642 160012 28: SUB RO, (R2) :FORCE ODD ADDR ERROR - GO TO 4$ 
13153 047644 010437 000004 MOV R4, ans :RESTORE T.0. VECTOR 

13154 047650 104006 3$: ERROR 6 SODD ADDR FAILED TO TRAP 

13156 047652 010437 000004 4$: MOV _— R46 , ah ;RESTORE T.0. VECTOR 

13157 047656 010506 MOV R5,SP SET SP 

13158 047660 005037 000000 CLR a0 ‘CLR LOC. 0 JUST IN CASE 

13160 FRR EREKEREREE 
13161 SSTEST 670 TEST FOR ODD ADDR. ERROR TRAP FOR DEST. DEFERRED MODES 
13162 MAB RASRASRASALESASRE SASS SARA ER SERRE SE SESE RRR RES RRS ERR RRR SERRE SSS SS 
13163 047664 781670: 

13164 047664 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
13165 047666 012700 000670 MOV #670,RO *;LOAD RO WITH TEST NUMBER 

13166 047672 013701 047714 MOV av2$.R1 *LOAD R1 WITH TEST INSTRUCTION WORD 
13167 047676 012702 063323 MOV A#MBUF 14+7,R2 :DEST eo ah (ODD) 

13168 047702 012737 047764 000004 MOV #4$,a4%4 :GO TO 4$ ON ODA T 

13170 047710 010205 MOV R2,R5 :C(R5] = DEST. ADDR 

13171 047712 000257 ccc :SCOPE SYNC 

HE be 047714 105435 2s: NEGB a(R5)+ : TEST DM=3 TRAP 

Hf ibe 047716 104006 3$: ERROR 6 ODA TRAP NOT SPRUNG 

13177 047720 012705 063325 MOV #MBUF 1+3,R5 :(R5] = DEST. ADDR 

13178 047724 013701 047732 MOV a#20$,R1 :€R1] = TEST INSTR 

13179 047730 000257 CCC :SCOPE SYNC 

13181 047732 105455 208: NEGB = a=(R5) :TEST DM=5 TRAP 

13185 047734 104006 5$: ERROR 6 Z0DA TRAP NOT SPRUNG 

13185 047736 010205 MOV R2,R5 ;(R5] = DEST ADDR 

13186 047740 013701 047746 MOV a#21$,R1 :(R1] = TEST INSTR 

13187 047744 000257 CLC *SCOPE SYNC 

13189 047746 105475 000000 21$: NEGB a0 (RS) :TEST DM=7 TRAP 

13191 047752 104006 7$: ERROR 6 :0DA TRAP NOT SPRUNG 

13193 047754 012737 061224 000004 MOV MBERR, a6 RESET T.0. VECTOR 

13194 047762 000403 BR TST671 +260 TO SCOPE EXIT 
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CQKDAE .P11 17=SEP=79 09:47 T670 TEST FOR ODD ADDR. ERROR TRAP FOR DEST. DEFERRED MODES SEQ 0244 

13195 

13196 047764 062716 000002 4$: ADD #2, (SP) sMOV RETURN PC AROUND ERROR CALL 

13197 047770 000002 RTI :RETURN TO NEXT SUB-TEST 

13199 SPARE REE REE REE EREREREREEREREE EE RRR ERE EEEEAEAEEREREEEEEE 

13200 s*TEST 671 TEST FOR ODD ADDR ERROR TRAP FOR SOURCE DEFERRED MODES 

13201 CLARA RARER RRR REE ERE RREREEEREAEREEAERERE 

13202 047772 TST671: 

13203 047772 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 

13204 047774 012700 000671 MOV #671,R0 *:LOAD RO WITH TEST NUMBER 

13205 05000 013701 050022 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

13206 05 012702 063323 MOV AMBUF 1+17,R2 -£R2] = SOURCE ADDR. (ODD) 

13207 050010 012737 050072 000004 MOV #4$,a%4 :GO TO 4$ ON TRAP 

13209 050016 010205 MOV R2,R5 ;(R5] = SOURCE ADDR. 

13210 050020 000257 CCC :SCOPE SYNC 

1ssi¢ 050022 11350uU46 2s: MOVB @(R5)+,R4 : TEST SM=3 

13214 050024 104006 3$: ERROR 6 Z0DA TRAP NOT SPRUNG 

13216 050026 012705 063325 MOV #MBUF 1+3,R5 :(R5] = SOURCE ADDR 

13217 050032 013701 050040 MOV av20$,R1 :€R1] = TEST INSTR 

13218 050036 090257 CCC :SCOPE SYNC 

13220 050040 115504 208: MOVB = a= (R5) RG :TEST SM=5 

13222 050042 104006 5$: ERROR 6 ODA TRAP NOT SPRUNG 

13223 050044 010205 MOV R2,R5 :(R5] = SOURCE ADDR 

13224 050046 013701 050054 MOV a#21$,R1 :(R1] = TEST INSTR 

13225 050052 000257 CCC ‘SCOPE SYNC 

13207 050054 117504 000000 218: MOVB a0(R5),R4 : TEST SM=7 

iE a4 050060 104006 7$: ERROR 6 ;ODA TRAP NOT SPRUNG 

13231 050062 012737 061224 000004 MOV ABERR, ats :RESET T.0. VECTOR 

13232 050070 000403 BR TST672 ::GO0 TO SCOPE EXIT 

13234 050072 062716 000002 4$: ADD #2, (SP) MOVE RETURN PC AROUND ERROR CALL 

ise 050076 000002 RTI RETURN TO NEXT SUB-TEST 

13237 SRE 
i*TEST 672 TEST FOR ODD ADDR ERROR TRAP FOR JMP DEST DEFERRED MODES 

13239 LL R ARREARS 

13240 050100 1S1672: 

13241 050100 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 

13242 050102 012700 000672 MOV #672,RO ; sLOAD RO WITH TEST NUMBER 

13243 050106 013701 050130 MOV ar2$.Rl LOAD R1 WITH TEST INSTRUCTION WORD 

13244 050112 012702 050203 MOV #6$+3,R2 ‘DEST ADDR = = 6$+3 (ODD) 

13245 050116 012737 050206 000004 MOV #4$,a%4 :GO TO 4$ ON ODA T 

13247 050124 010205 MOV R2,R5 :(R5] = DEST ADDR 

13248 050126 000257 CCC [SCOPE SYNC 


13250 050130 000135 2$: JMP a(R5)+ TEST JMP DM=3 
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246 
1672 ~+~*TEST FORK ODD ADDR ERROR TRAP FOR JMP DEST DEFERRED MODES SEQ 0245 
3s: ERROR 6 ZO0DA TRAP NOT SPRUNG IN ROM LOC 153 
MOV #6$+3,85 :(R5] = DEST ADDR 
MOV a#20$,R1 :(R1] = TEST INSTR 
CCC *SCOPE SYNC 
208: JMP a-(R5) sTEST JMP DM=5 
S$: ERROR 6 :0DA TRAP NOT SPRUNG IN ROM LOC 155 
MOV R2,R5 ;£R5] = DEST ADDR 
MOV a#21$,R1 :€R1] = TEST INSTR 
CCC :SCOPE SYNC 
21$: JMP a0(R5) :TEST JMP DM=7 
7$: ERROR 6 :O0DA TRAP NOT SPRUNG 
MOV WBERR, as :RESET BUS T.O. VECTOR 
BR TST673 *:GO TO SCOPE EXIT 
6$: HALT :CATASTOPHIC ERROR - CPC] QUESTIONABLE. 
HALT “RESTART PROGRAM - DO NOT CONTINUE. 
HALT 
4$: BIT #1, (SP) ; TRAP DUE TO ODD PC? 
BNE 8$ ‘BR IF YES 
ADD #2, (SP) :MOV RETURN PC AROUND ERROR CALL 
RT] [RETURN TO NEXT SUB TEST 
as: MOV (SP) .R3 :GET ODD PC OFF STACK INTO R3 
ADD #4,SP sFIX SP 
9$: ERROR 7 :PC TRAPPED WITH ODD ADDRESS 
MOV WBERR, ans ;RESET T.0. VECTOR 
CFA AERER EERE EE EH 
T*TEST 673 TEST FOR STACK OFLW FOR DEST MODES 1.2.4, AND 6. 
Ce eeheeeeeeenenadeneednedenaneneneneanateneereneeeneererenaeere 
151673: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV 4673,RO +;LOAD RO WITH TEST NUMBER 
MOV a#2$.R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #4$,a% :GO TO ob ON OVFLW TRAP 
MOV SP.RS sSAVE SP 
MOV #376,R2 SUSE R2 TO SET UP SP TO CAUSE TRAP 
MOV R2,SP :SET UP SP TO CAUSE OVERFLOW 
CCC > SCOPE SYNC 
2$: CLR (SP) :TEST DM1 = SHOULD SPRING TRAP 
MOV SP, a#$REGS :SAVE BAD SP FOR PRINTING 


MOV RS, SP sRESET SP 
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3$: 


208: 


5$: 


21$: 


7$: 


228: 


of: 


4$: 


ERROR 


N 3 
17=SEP=79 09: 
TEST FOR STACK OFLW FOR 


6 
a4 20$,R1 
R2,SP 


(SP) + 

SP, a#$REGS 

R5,SP 

6 

a#21$,R1 
~SP 

-(SP) 

SP ,@4$REGS 

R5,SP 

6 

a#22$,R1 

R2,5P 

0(SP) 

SP ,a#$REGS 

R5,SP 

6 

#BERR , a4 

TST674 


R4, ~(SP) 
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DEST MODES 1,2,4, AND 6. 


;DM1 FAILED TO CAUSE OVERFLOW TRAP 


;CR1J = TEST INSTR 
SET UP SP TO CAUSE OVERFLOW 
;SCOPE SYNC 


TEST DM2 = SHOULD SPRING TRAP 


;SAVE BAD SP FOR PRINTING 
sRESET SP 
;DM2 FAILED TO CAUSE OVERFLOW TRAP 


3;CR1] = TEST INSTR. 
;SET UP SP TO CAUSE OVERFiOW 
;SCOPE SYNC 


TEST DM4 = SHOULD SPRING TRAP 


saree a4 SP FOR PRINTING 
7DM4 FAILED TO CAUSE OVERFLOW TRAP 


;CR1] = TEST INSTR. 
;SET SP TO CAUSE ERROR 
SCOPE SYNC 


TEST DM6 - SHOULD SPRING TRAP 

; SAVE BAD SP FOR PRINTING 

RESET SP 

:DM6 FAILED TO CAUSE OVERFLOW TRAP 


;RESET BUS T.0O. VECTOR 
3:GO TO SCOPE EXIT 


;GET RETURN PC OFF STACK 

;MOVE RETURN PC AROUND ERROR CALL 
RESET SP 

;PUSH NEW PS ON STACK 

PUSH RETURN PC ON STACK 

RETURN TO NEXT SUB-TEST 


WEARS RRARRSERSRSLSR SESE ERE R RSE RE RRS RRR RSR ARRAS RAS RAR RA RASA RRR ADE 


D*TEST 674 


° - eRe ORRAeHeHeeReReeAeHReRKRHRkeRhekehhenetenenteneneeereneener 


1$1674: 


TEST FOR STACK OVFLW FOR MOV DEST MODES 1.2.4, AND 6. 


anes, 


zcnt THE SCOPE ts UTILITY 
ee wie TEST NUMBER 
1 WITH 1g lene ae WORD 


iOAD R 
#4$, Pol :GO TO “it ON N_ STACK OVFLW T 


‘USE R2 TO SET UP SP TO CAUSE TRAP 


7 SET i. 4 TO CAUSE OVFRr LOW 
SCOPE SYNC 


SEQ 0246 


OQ aN 
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010637 
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000257 
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1674 TEST FOR STACK OVFLW FOR MOV DEST MODES 1,2,4, AND 6. 


2$: MOV 


3$: ERROR 


208: MOV 


5$: ERROR 


21$: MOV 


7$: ERROR 


22s: MOV 


9$: ERROR 


4$: MOV 


MOV 
RTI 


8 
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RO, (SP) 
SP ,a#$REGS 
RS ,SP 


a720$,R1 
R2,SP 


RO, (SP) + 
SP, @#$REGS 
RS,SP 


af#21$,R1 
R2,SP 
RO,-(SP) 
SP, a#$REGS 
R5,SP 


a422$,R1 
R2,SP 


RO,0(SP) 
SP ,@#$REG5S 


* 


BERR , a4 
TST675 


(SP) ,R4 
a 


;TEST MOV DM1 = SHOULD SPRING TRAP 
aPSeT o> SP FOR PRINTING 
“MOV DM1 FAILED TO SPRING TRAP 
;CR1J = TEST INSTR. 
;SET UP SP TO CAUSE OVERFLOW 
;SCOPE SYNC 
; TEST MOV DM2 = SHOULD SPRING TRAP 
:SAVE BAD SP FOR PRINTING 
sRESET SP 
sMOV DM2 FAILED TO SPRING TRAP 
-CR1J = TEST INSTR. 

;SET ys = TO CAUSE OVERFLOW 
‘SCOPE S YNC 
; TEST MOV DM4 - SHOULD SPRING TRAP 
;SAVE BAD SP FOR PRINTING 
SRESET SP 
sMOV DM4 FAILED TO SPRING TRAP 
Ath = TEST INSTR 

T UP SP TO CAUSE OVERFLOW 

‘SE opE SYNC 
7 TEST MOV DM6 - SHOULD SPRING TRAP 
:SAVE BAD SP FOR PRINTING 
sRESET SP 
sMOV DM6 FAILED TO CAUSE OVFLW TRAP 


a Y T.O. VECTOR 
:GO TO SCOPE EXIT 


GET RETURN PC 
at 9+ Bae la PC AROUND ERROR CALL 


;RETURN TO NEXT SUB-TEST 


CAREER EERE RAE REE REE REAR TERRE EE 


TEST THAT JSR CAN CAUSE OVERFLOW TRAP 


_WeA SAAS 2202522 SESSA SASSRARASASAAASRRSESSASERR ESR R RAS ERR RS SSSR SS SS | 


i*TEST 675 
TS1675: 


#675, ” 


2 CALL THE SCOPE LOOP UTILITY 
ee TEST NUMBER 
OAD R1 WITH TEST INSTRUCTION WORD 


av2$.R 
#48 am ; :G0 TO it ON OVERFLOW ERROR 


2400. SP 


AV 
SET THE SP TO CAUSE TRAP 


SEQ 0247 


3 
wo 
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050662 


001074 


001074 


001074 


061224 


000676 


050742 
000014 


050756 
050762 
000400 


001074 


001074 


061224 
000014 


2$: 


3$: 


4$: 


6$: 
5$: 
8$: 


SRTEST 676 
151676: 


es: 


3$: 


43: 


6$: 
5$: 
8$: 


CLARA RARER ERE RARER EERE EERE EEE REAR EEEREER ERED 


TEST THAT 2ND PUSH IN TRAP MICROUTINE CAUSES OVFLW TRAP 


Wet AtA SRR E REE EERE R AS ERRRRRARRSRRRERER ESR RRR RRR RRR RRR RSE SSS RSS SY 


1$1677: 


i*TEST 677 


MACY11 30A(1052) 
7675 









PC, a#6$ 
SP, @#SREGS 
5. 

5 

8$ 

SP, @#$REGS 
5,SP 


SP ,@A#SREGS 
5,SP 


#BERR , a4 


#676,RO 
a42$,R1 
a#14,R4 


#400,SP 


SP, a#$REGS 
R5,SP 

5 
8$ 


R5,SP 
8$ 


Se ta 


BERR , 044 


R4,a414 
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TEST THAT JSR CAN CAUSE OVERFLOW TRAP 


TEST JSR = SHOULD SPRING TRAP 

: SAVE - SP FOR ERROR PRINTOUT 

;JSR PUSH DID NOT SPRING OVFL TRAP 
:GO TO SCOPE EXIT 

; SAVE BAD SP FOR ERROR PRINTOUT 

‘< EXIT. TEST = ALL OK 

eee o SP FOR ERROR PRINTOUT 

3JSR PUSH FAILED TO SPRING OVFLW TRAP 
sRESET BUS T.0. VECTOR 


FEE REE KEE EEE KERR EERE KEKE REREREKEEKEREEEREEREKKEE 


TEST THAT 1ST PUSH IN TRAP MICROROUTINE CAUSES OVFLW TRAP 


SEERA REE ERR AKEE EEE REE EERE 


CALL THE SCOPE LOOP UTILITY 
;LOAD RO WITK TEST NUMBER 
;LOAD R1 WITH TEST edge thy WORD 
SAVE BREAK POINT TRAP VECTOR 
SP,R5 zSAVE SP 
#4$,a%4 ;GO TO 4$ . OVFLW TRAP 
#6$,a414- +e O 6$ IF BPT SERVICED 
ET UP SP TO CAUSE OVFLW ON 1ST PUSH 
TEST THE BPT - SHOULD CAUSE OVERFLOW TRAP 
cee - SP FOR ERROR PRINTOUT 
;BPT FAILED TO TRAP 


:GO TO SCOPE EXIT 


:RE SP 

:GO EXIT - ALL OK 

ET oP SP FOR ERROR PRINTOUT 

SOVFLW TRAP FAILED TO BUMP BPT SERVICE 
RESET VECTORS 
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1677 TEST THAT 2ND PUSH IN TRAP MICROUTINE CAUSES OVFLW TRAP 


SCOPE : CALL THE SCOPE LOOP UTILITY 
MOV #677,RO OAD RO WITH TEST NUMBER 
MOV a#2$,R1 ‘OAD R1 WITH TEST INSTRUCTION WORD 
MOV aris RG : SAVE BPT VECTOR 
MOV SP, AVE SP 
MOV aS ar, :GO TO 4$ ON STACK OVF LOW 
MOV #6$.a414 :GO0 TO 6$ IF BPT SERVICED 
MOV #402,SP :SET SP TO CAUSE TRAP ON 2ND PUSH 
CCC :SCOPE SYNC 
28: BPT ;TEST THE BPT - SHOULD CAUSE OVERFLOW TRAP 
MOV SP, AASREGS :SAVE BAD SP FOR PRINTING 
MOV R5,SP “RESET SP 
3$: ERROR 5 :BPT FAILED TO TRAP 
BR RE :GO TO SCOPE EXIT 
4$: MOV R5,SP :RESET SP 
BR x3 *GO EXIT = ALL CK 
6$: MOV SP, A#SREGS :SAVE BAD SP FOR PRINTING 
MOV R5.SP TRESET SP 
S$: ERROR 5 [OVFLW TRAP FAILED TO BUMP BPT SERVICE 
8$: MOV ABERR, att, :RESET VECTORS 
MOV R4, ans 
FRA EER ARERR EERE EERE ERE ERE RARER EE EH 
*STEST 700 ILLEGAL INSTRUCTION TEST = JSR RN,2R 
Went eAeeRRRRRRRRRRSSSASASASRASSSSRS SESS SSSR SSR ESS S RASA SSS E RSE SSS SSS SS 
TST700: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #700,RO LOAD RO WITH TEST NUMBER 
MOV av2$,R1 ‘OAD R1 WITH TEST INSTRUCTION WORD 
MOV SPR5 *SAVE SP 
MOV PC, @¥$LPERR [SET ERROR LOOP ADDRESS 
1$: MOV ars RS :SAVE T.0. VECTOR 
MOV #4$.a4%4 ;ILLEGAL INSTR. TRAP GOES TO 4$ 
MOV R5,SP :RESET SP FOR ERROR LOOP 
MOV #3$,R2 7IN CASE JSR JUMPS TO [R2] 
CCC = SCOPE SYNC 
2$: JSR R3,R2 ;JSR MODE 0 FORCES TRAP - GO 70 4$ 
MOV R4 ans :RESTORE 1.0. VECTOR 
3$: ERROR 5 ‘JSR FAILED TO SPRING TRAP 
4$: MOV R4, ans :RESTORE VECTOR 
MOV R5,SP SRESET SP 
CLARA AERA RARE EEE REE ERR EERE AEE EERR EE RER EEE EE 
S*TEST 701 ILLEGAL INSTRUCTION TEST - JMP %R 
CTR AREER EERE ERE AERA AEE EERE AREER ERE RRERAERRR ERE EES 
TST701: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 


SEQ 0249 


CQKDA-E KD11-K BASI 


CQKDAE .P11 


051172 


051230 
051232 


051234 
051240 


051242 
051246 


051250 


051306 
051310 
051312 
051314 


051326 


051330 
05 


051364 
051370 
051372 
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010437 
010506 


Dsl 
2 


000004 


000702 
051312 


001010 
000004 
051322 
160000 


000004 
000004 


000703 
051374 


001010 
051402 
000020 
051374 


000004 


000004 


000014 
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7701 


1$: 


2$: 


3$: 
4$: 


E 
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ILLEGAL INSTRUCTION TEST = JMP ZR 


#701,R0 
a72$,R1 


SP,R 
PC ,@#$LPERR 


;;LOAD RO WITH TEST NUMBER 

‘CAE pst WITH TEST INSTRUCTION WORD 
SET ERROR LOOP ADDRESS 

; SAVE Bh POINTER AT LOC. 4 


a4 RS 
#4$.a#4 ;0N TRAP = GO TO 4 
R5, SP 


#3$,R2 


R2 


R4, aM 
5 


R4, 044 
R5,SP 


RESET SP FOR ERROR LOOP 
;IN CASE IT JUMPS TO ADDR IN RN 
>SCOPE SYNC 


:JMP MODE 0 FORCES TRAP = GO [0 4$ 


RESTORE VECTOR POINTER AT LOC. 4 
; ILLEGAL INSTR TRAP FAILED 


sRESTORE VECTOR POINTER AT LOC. 4 
RESET SP 


SRR REE ERK REE EEE EERE AREE EE 


SeTEST 702 


TST702: 


1$: 


2$: 


3$: 
4$: 


SCOPE 


BUS TIMEOUT TRAP TEST = TST (R) 


ST AAR REAR E RE RER EEE ER RR KEEREAREERERER EEE EREREREH ERE EEE 


#702,R0 
a#2$,R1 


SP .R5 

PC ,@#$LPERR 
a4 ,R4 
#4$,aM4 ; 
#160000 ,R2 
R5,SP 

(R2) 
R4,a44 

5 


R4,04%4 
R5,SP 


ON T. 


: CALL THE SCOPE LOOP UTILITY 
;LOAD RO WITH TEST NUMBER 
:LoAD RI R1 WITH TEST INSTRUCTION WORD 


;SAVE SP 
2 SET ERROR LOOP ADDRESS 
SAVE ORIGINAL T.O. VECTOR POINTER 


0. TRAP - GO TO 4$ 


ADDRESS CAUSES T.0. 


;RESET SP FOR ERROR LOOP 
;SCOPE SYNC 


:FORCE T.0. TRAP - GO TO 4$ 
RESTORE T.0. VECTOR 


TIMEOUT TRAP FAILED 


SRESTORE T.0. VECTOR 
‘RESET SP 


» FREER EERE ARERR REE REE ERREE EERE AERA EEE RERERE NER EK 


T*TEST 703 


$1703: 


'T’' BIT TRAP TEST 


+: LARS AAAS ALAR RARER SASSSAARASASSALSRSSASERARA RS SSESE SER SSSR RRS SS S| 


#703,R0 
ay R1 

PC, @4$LPERR 
R5,SP 

#6$, avl4 


#20,-(SP) 
#2$.-(SP) 


+> THE SCOPE LOOP UTILITY 
OAD RO WITH TEST NUMBER 

LOAD I R1 WITH TEST INSTRUCTION WORD 

i SET ERROR LOOP Tie 

RESET SP FOR ERROR 


[SET UP NEW PC ON STACK 
SCOPE SY 


NC 
:TURN ON ''T'' BIT = GO TO 2% 


SEQ 0250 
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CQKDAE .P11 


13607 


PeeSse secrete 


FREFESETREERE 


BWM CO OONAUSWNH-O 


a as ak a a od ot to et es 


3 


areas 
OONAW 


051374 
051376 
051400 


051402 
051410 


051412 
051414 


051422 
051426 


051460 
053462 


051502 


051504 
051510 


051512 


051524 


051526 
051530 


051534 


17=SEP=79 
005700 
104005 
000405 


032766 
001001 


104001 
012737 


010506 
010437 


IC TESTS 
09:47 
000020 000002 


000016 000014 
000016 


000004 


F 4 
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1703 "BIT TRAP TEST 


2$: TST RO ; SPRING ‘'T'' BIT TRAP = GO TO 4$ 
3$: ERROR 5 NO ''T’’ BIT TRAP OCCURRED 
BR 6$ 3GO EXIT 
4$: BI’ #29,2(SP) ;'‘T'' BIT SET IN OLD PSW? 
BNE 6$ ;BR IF YES 
5$: ERROR 1 ;4T# BIT NOT SAVED ON STACK 
6$: MOV #16,a414 sPESTORE ‘'T’' BIT TRAP CATCHER 
CLR avi6 
MOV R5,SP RESET SP 
RRR EEEREERERRREREEEEREREERERERERRRERERE RE Re 
T*TEST 704 TEST PUSH INTO PSW a TK CSP5 = 000000 


; THESE NEXT TWO TESTS VERIFY THAT A ‘RED ZONE'’ TRAP OCCURS IF 
[PUSH IS ATTEMPTED WITH THE CSP] INITIALLY EQUAL TO 000000, 177872, 


VERA RSRRRRERESESASE SERS ERR RES ARERR REAR RRR RRR RR SAAS RRR ALAR SSAA S S| 


1ST704: 
SCOPE = CALL THE SCOPE LOOP UTILITY 
MOV #704,R0 ;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
MOV SP.R5 ; SAVE THE SP 
MOV a4 RS ;SAVE THE BUS — VECTOR 
MOV #4$,a44 ;' RED ZONE" TRAP GOES TO 4$ 
CLR SP MAKE SP = 500000 
CCC : SCOPE SYNC 
es: MOV #7777 ,-(SP) ATTEMPT PUSH INTO PSW - SHOULD CAUSE 
:'RED ZONE'’ TRAP TO BE SPRUNG 
MOV R4,a44 sRESTORE BUS ERROR VECTOR 
CLR R4 3;CR4] = § / B SP 
MOV SP,R3 :CR3] = WAS SP 
MOV R5,SP ;RESET THE SP 
3$: ERROR 3 : TRAP NOT SPRUNG 
BR TST705 ::GO TO SCOPE EXIT - SCHOOL'S OUT 
4$: CMP #0,SP ;WAS IT A RED ZONE TRAP ? 
BEQ 6$ ;BR IF YES 
MOV R4,a44 ZRESTORE BUS ERRGR VECTOR 
CLR RS 7C0R4J]= § / B SP 
MOV SP ,R3 7C0R3J] = WAS SP 
MOV R5.SP ;RESET THE SP 
5$: ERROR 3 ; TRAP SPRUNG BUT NOT RED ZONE 
6$: MOV R5,SP zFIX UP THE SP 
MOV R4,a44 ;RESTORE BERR VECTOR 
FST AEAAAAAAAAAAAAAHERARHERRAE HO ROARRRERRARARERAERAERAEEEKEEEE ERE RE 
z*TEST 705 TEST PUSH INTO SR WITH [CSP] = 177572 


RRA EAARARE TERE AAAEAAAREEREERE RARER ERR REE Ee 


151705: 


SFQ 025! 


on Te) 










CQKDAE .P 


ed et a nd et dd ot at ot ot Sh ot a St et ot st 
oo 


SEESEREREES 


BERR RRR RRS 
tS NEN i 


a 


eeeceeeenee 


ee as et od od od 


wee 
LOLs 


CQKDA=E a he) & S 


051570 


051574 
051600 
051602 
051604 
051606 
051610 
051612 
051616 


051620 


051674 
051676 


051702 


051716 


051720 
051724 


000004 


000706 
051676 


000004 
051720 
177776 
000200 


000004 


000004 


000004 


3$: 


4$: 


5$: 
6$: 
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TEST PUSH INTO SR WITH [SP] = 177572 


CALL THE SCOPE LOOP UTILITY 
3;LOAD RO WITH TES’ NUMBER 


;LOAD R1 WITH TEST INSTRUCTION WORD 
SAVE THE SP 
THE BUS pr VECTOR 


; SAVE 
aS. ans es ZONE'’ TRAP GOES 


#177572, 
#-1,-(SP) 


R4,aM% 
R4 


SP ,R3 
RS,SP 


3 
TST706 


#0,SP 
6$ 
R4 a4 
R4 


SP ,R3 
R5,SP 
3 


RS ,SP 
R4, 044 


MAKE SP=177572 
; SCOPE SYNC 


ATTEMPT PUSH INTO SR ~ SHOULD CAUSE 
;" RED ZONE'’ TRAP TO BE SPRUNG 


sRESTORE oT — VECTOR 


>(R3) = as SP 
SRESET THE SP 
; TRAP NOT SPRUNG 
:GO TO SCOPE EXIT - SCHOOL'S OUT 


;WAS IT A RED ZONE TRAP ? 
;BR IF YES 


RESTORE BUS ERROR VECTOR 


SCR4]= S$ / B SP 


‘TRAP SPRUNG BUT NOT RED ZONE 


FIX UP THE SP 
[RESTORE BUS ERROR VECTOR 


SEAR RE RARAERER RR EREAEEE RARER EEERREEEAEREERERE EEE EH 


i*TEST 706 


TST706: 


2$: 


3$: 


4$: 


TEST PUSH INTO SLR WITH CSP] = 177776 


REAR RERAEERAAEKEEEEAEEAKEERERAEAAEARAAREREEKEREREARAARAEERAREREEAKEEK EERE 


#177776, 5P 


;CALL_THE SCOPE LOOP UTILITY 
;;LOAD RO WITH TEST NUMBER 
;LOAD R1 WITH TEST INSTRUCTION WORD 


SAVE THE SP 
E— THE BUS ERROR VECTOR 


E SP=177776 


a4 ,R4 ; SAV 
#6$.aa4 ;' RED ZONE" TRAP ¢ GOES TO 4$ 


#200,-(SP) 


3 
TST707 


#0, SP 
6$ 


;SCOPE SYNC 
ZATTEMPT PUSH INTO SLR = SHOULD CAUSE 


"RED ZONE'’ TRAP TO BE SPRUNG 
: RESTORE vores VECTOR 


“ER3] = WAS SP 


:RESET, THE Be 
TRAP NOT SPRUNG 
:G0 TO SCOPE EX!T = SCHOOL'S OUT 


sWAS IT A RED ZONE TRAP ? 
;BR IF YES 


. 


SEQ 0252 
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CQKDAE .P11 17=SEP=79 09:47 7706 TEST PUSH INTO SLR WITH [SP] = 177776 SEQ 0253 
13699 

13700 051726 010437 000004 MOV R4,a44 RESTORE “ ™ VECTOR 

13701 051732 005004 CLR RS T(R4J= $/ BS 

13702 051734 010603 MOV SP ,R3 ;CR3J = WAS sp 

13703 051736 010506 MOV R5,SP sRESET THE SP 

13706 051740 104003 S$: ERROR 3 ; TRAP SPRUNG BUT NOT RED ZONE | 
13706 051742 010506 6$: MOV RS,SP 3F IX UP THE SP 

Hf 24°24 051744 010437 000004 MOV R4,aA4 ;RESTORE BUS ERROR VECTOR 

13709 DD III OO RR REE EES ER RE 
13710 s*TEST 707 RSVD INSTRUCTION TEST = 000007 THRU 000077 

13711 DDI IOI IOIOIIOIIOIIUIIIIIIOIIUIIUIUIUIOUIIIOII III IOI Dn ik itt ttt 

1371 051750 TST707: 

13713 051750 000004 SCOPE ¢ CALL THE SCOPE LOOP UTILITY 

13714 051752 012700 000707 MOV #707,RO ;LOAD RO WITH TEST NUMBER 

13715 051756 010605 5$: MOV SP,R5 :SAVE THE SP 

13716 051760 012737 052016 000010 MOV #4$,a#10 ;SET UP RSVD INSTR. TRAP VECTOR 

13717 051766 005037 000012 CLR avi2 

13718 051772 012701 000007 MOV #7,R1 ;SET UP FIRST ONE IN GROUP . 

13719 051776 010737 001010 MOV PC, rr ONLY LOOP ON BAD OP CODE 

13720 052002 010506 1$: MOV R5,S RESET SP FOR ERROR LOOP AND NEW INSTR 
13721 052006 010137 052012 MOV R1 428 7; LOAD NE‘ INSTR 

13756 052010 000257 CCC SCOPE SYNC 

13724 052012 000007 2s: 000007 ; TEST THE RSVD INSTR - THIS LOCATION 
iP 4 GETS CHANGED EACH PASS THROUGH 

Hf 1044 052014 104005 3$: ERROR 5 sRSVD INSTR. IN R1 FAILED TO TRAP 
13729 052016 005201 4$: INC R1 :GENERATE NEW RSVD INSTR 

13730 052020 022701 000100 CMP #700,R1 zAT END OF THIS GROUP ?? 

ed 052024 001366 BNE 1$ ;BR IF NOT 

13733 052026 010506 MOV R5,SP 7MAKE SURE TO RESET THE SP 

13734 052030 012737 051756 001010 MOV #5% ,AASLPERR ;LOOP FROM BEGINNING ON ERROR 

13735 : + eARAARAARRRERREREEEREEERRERERERRRREREEREERRERRRERRERE EERE REE 
13736 *TEST 710 RSVD INSTRUCTION TEST = 000210 THRU 000237 

13737 2 Re ee te ee RRR REE RE RE REE REE REET REE RR 
13738 052036 1§1710: 

13739 052036 000004 SCOPE :CALL THE SCOPE LOOP UTILITY | 
13740 052040 012700 000710 MOV #710,R0 ;LOAD RO Ni TEST NUMBER 

13741 052044 010605 5$: MOV SP,R5 «SAVE THE S 

13742 052046 012737 052104 000010 MOV #430410 ‘SET UP RSWD INSTR. TRAP VECTOR 

13743 052054 005037 000012 CLR ave 

13744 052060 012701 000210 MOV #210.R ;SET UP FIRST ONE IN GROUP 

13745 052064 010737 001010 MOV PC. OFSLPERR 7 SET ERROR LOOP ADDRESS 

13746 052070 010506 1$: MOV R5,SP RESET SP FOR ERROR LOOP AND NEW INSTR j 
13747 052072 010137 052100 MOV R1,a@42$ ;LOAD NEW INSTR 

fe 4 052076 000257 CCC ;SCOPE SYNC 

13750 052100 000210 2$: 000210 ; TEST THE RSVD INSTR = THIS LOCATION 
tL GETS CHANGED EACH PASS THROUGH 

13753 052102 104005 3$: ERROR 5 ZRSVD INSTR. IN R1 FAILED TO TRAP 
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005201 4$: R1 GENERATE NEW RSVD INSTR 
022701 000240 #240,R1 zAT END OF THIS GROUP ?? 
001366 1$ ;BR IF NOT 


010506 R5,SP MAKE SURE TO RESET THE SP 
012737 052044 001010 #5$,Q4SLPERR SLOOP FROM BEGINNING ON ERROR 


S REAR ERR RERKERAARAEA EERE ES 


S*TEST 711 RSVD INSTRUCTION TEST = 007000 THRU 007777 


S REAR RRERAAREEARREEEA EEE EEKEEEREE REE 


1$1711: 
7 CALL THe SCOPE LOOP UTILITY 
000711 MO ;LOAD RO WITH TEST NUMBER 
S$: SP,R5 + SAVE THE SP 
052172 ;SET UP RSVD INSTR. TRAP VECTOR 
000012 aie 


, 
007000 P ;SET UP FIRST ONE IN GROUP 
001010 PC ,@#$LPERR 7 SET ERROR LOOP ADDRESS 
: R5,S RESET SP FOR ERROR LOOP AND NEW INSTR 
052166 R1,a42$ ;LOAD NEw INSTR 
:SCOPE SYNC 


;TEST THE RSVD INSTR = THIS LOCATION 
GETS CHANGED EACH PASS THROUGH 


052170 : ;RSVD INSTR. IN R1 FAILED TO TRAP 
052172 : R1 ;GENERATE NEW RSVD INSTR 


052174 010000 #10000,R1 AT END OF THIS GROUP ?? 
052200 001366 1$ ;BR IF NOT 


052202 010506 R5,SP MAKE SURE TO RESET THE SP 
052204 012737 052132 001010 #5$,aASLPERR ;LOOP FROM BEGINNING ON ERROR 


SF ERE ERA RARER EERE EERE ERE REE EER ERE REE EEE 


s*TEST 712 RSVD INSTRUCTION TEST = 075000 THRU 076777 


Wet AAAASSEEEERERASASLASASASAASASASE ERASE SESE RRS R SRS SRR E RSS SE SS | 


052212 TST712: 
2 CALL THE SCOPE LOOP UTILITY 
000712 MO #712,RO ;LOAD RO WITH TEST NUMBER 
5$: SP ,R5 >SAVE THE SP 
052262 000010 #4$,a4#10 :SET UP RSVD INSTR. TRAP VECTOR 
000012 aie 


#75000,R1 ;SET UP FIRST ONE IN GROUP 
PC. ose. Pens :SET ERROR LOOP ADDRESS 
: R5.S RESET SP FOR ERROR LOOP AND NEW INSTR 
052254 R1, 3925 ; LOAD NEW INSTR 
052252 000257 SCOPE SYNC 


052254 : ; TEST THE RSVD INSTR = (HIS LOCATION 
GETS CHANGED EACH PASS THROUGH 


052256 3 IN CASE NON TRAPPING INSTR IS TWO WORDS 
052260 : ;RSVD INSTR. IN R1 FAILED TO TRAP 


052262 : GENERATE NEW RSVD INSTR 
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13811 64 022701 076600 CMP #MED,R1 :MED INSTRUCTION? ' 
13812 052270 001774 BEQ 4 “BR IF YES=<SKIP IT. 

13813 052272 022701 077000 CMP #077000,R1 ‘AT END OF THIS GROUP ?? 

13814 052276 001362 BNE 1$ ‘BR IF NOT 

13816 052300 010506 MOV R5,SP ;MAKE SURE TO RESET THE SP 

if 052302 012737 052220 001010 MOV #5$,a4$LPERR ;LOOP FROM BEGINNING ON ERROR 

13819 CE AAR AAKR AAA RARARAERAARERRERERRERARREERERHEHREREREERERERE REED 

13820 SeTEST 713 RSVD INSTRUCTION TEST = 106400 THRU 107777 

13821 SP Maladie ladahatehehahclaleheieiahahehehehahalatatehehahahehsiehehahehehshcheiehehelahehehehelahaheieiohehsiaieleksiaheheietelehel 

13822 052310 1$1713: 

13823 052310 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

13824 052312 012700 000713 MOV #713,R0 *:LOAD RO WITH TEST NUMBER 

13825 052316 010605 S$: MOV SP,R5 SSAVE THE SP 

13826 052320 012737 052356 000010 MOV #4$,a4#10 ‘SET UP RSVD INSTR. TRAP VECTOR 

13827 052326 005037 000012 CLR aie 

13828 052332 012701 106400 MOV #106400,R1 :SET UP FIRST ONE IN GROUP 

13829 052336 010737 001010 MOV PC, ,@#$LPERR SET ERROR LOOP ADDRESS 

13830 052342 010506 1$: MOV R5,SP SRESET SP FOR ERROR LOOP AND NEW INSTR 

13831 052344 010137 052352 MOV R1,a4#2$ ;LOAD NEW INSTR 

13832 052350 000257 ccc :SCOPE SYNC 


CQKDA=E es. BASIC L MACY11 30A(1052) 17=SEP-79° 03: 55 PAGE 257 
CQKDAE .P11 17=SEP=7' : 1713 RSVD INSTRUCTION TEST = 106400 THRU 107777 SEQ 0256 


13833 
13834 052352 106400 2$: 106400 ; TEST THE RSVD INSTR = THIS LOCATION 
13835 ;GETS CHANGED EACH PASS THROUGH 


13836 
052354 104005 : ;RSVD INSTR. IN R1 FAILED TO TRAP 


052356 005201 : R1 GENERATE NEW RSVD “pene 
052360 106500 #106500,R1 [MFPD INSTRUCTION ? 
052364 10$ ;BR IF NOT 


052366 106700 #106700,R1 SKIP MFPD AND MTPD se 
052372 110000 : #110000,R1 AT END OF THIS GROUP ? 
052376 1$ :BR IF NOT 


R5,SP MAKE SURE TO RESET THE SP 
052316 001010 #5$ ,QASLPERR ;LOOP FROM BEGINNING ON ERROR 
061126 000010 #RSERR,@410 RESTORE RSVD INSTR VECTOR 
000340 000012 #340,a412 
052424 ;CALL THE SCOPE LOOP UTILITY 


; THIS NEXT GROUP OF SEQUENTIAL TESTS VERIFIES THAT A ‘'T’ BIT 
; TRAP CAN BE SERVICED IN EACH MICROWORD THAT DOES A ‘BUT SERVICE"' 
sEACH ROUTINE ENTERS THE TRAP MICROUTINE WHEN THE TRAP IS SPRUNG 


052426 061074 000014 TSET: MOV ATBSER,@414 SET UP THE ''T’' BIT TRAP VECTOR 
052434 000340 000016 MOV #340,a416 sPRIORITY 7 


net ee eee ARASAASASLASAAALARS SESE SESE ESSER SESS RRR RRR RCA See Ee 
:ATEST 714 BUT SERVICE -- ONE WORD INSTRUCTIONS-ALL MODES -- FROM TABLE 
‘"INSTAB'' (INSTRUCTION TABLE) CONTAINS ALL ONE WORD INSTRUCTIONS 
“THAT TEST A “BUT SERVICE’ IN A UNIQUE ROM LOCATION. THE TABLE MUST 
:BE TERMINATED WITH A O ENTRY. 
CLR EKKEKKEEEEREKEERERREREEREREKEKE EE 
052442 TST714: 
012700 000714 MO #714,R0 ::LOAD RO WITH TEST NUMBER 
6$: SP,R5 ‘SAVE THE SP 
063642 HINSTAB,RS “PUT POINTER TO TABLE IN R4 
4$: (R4)+,R1 *LOAD R1 WITH TEST. INSTRUCTION WORD 
5$ [EXIT TEST IF END OF TABLE 
001010 PC ,a#$LPERR SLOOP ON FAILING INSTRUCTION ON 
1$: R1.a4#2$ ;STORE TEST INSTRUCTION TO BE EXECUTED 
#MBUF O,.R2 2) 


AMBUF 1-R3 3) 
R5,SP ; RESTORE SP FOR ERROR LOOPING 
000020 #20,-(SP) “T'’ BIT IN THE NEW PSW 
052516 MO #2$,-(SP) “MAKE NEW PC = 2$ 
: SCOPE SYNC 
052514 000006 sSET ‘'T’’ BIT = GO TO 2$ 


052516 2$: ; INSTRUCTION FROM TABLE IS STORED HERE AND 
; SHOULD SPRING TRAP 


052520 3$: ;BUT SERVICE FAILED 


052522 000754 BR 4$ :GET NEXT INSTRUCTION FOR BUT SERVICE TEST 
052524 012737 052446 001010 5$: #6$ ,aASLPERR ;LOOP FROM BEGINNING ON ERROR 


60 80 80 
SeN 


80 80 Bo So So So Bo 80 Bo Bo : 2 
SRE ESR See aS oore ee er seers 


EaseE 


~s FRRESR BE 
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BEER RREEEE 
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CQKDAE .?11 


13889 
13890 
13891 


— a os es Ss 
N 


052532 


052554 
052556 
052560 


052562 
052562 
052564 
052570 


052574 


052672 
052674 


052676 
052702 
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000004 
012700 
013701 


032737 
001401 
000000 


000715 
052556 
000020 
052560 


000716 
052640 


040000 
001010 


ES ged 


010456 


000717 
052676 
000020 
052676 


000000 


063240 


063322 
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1715 


BUT SERVICE TEST = (RT 


FLUE AREERE EERE RRE REE 


eTEST 715 BUT SERVICE TEST = (RTI) 


wee ORAS SEER E ERE R RRR ERE RRR RRR R REE R RRA REARS ARERR SSSR RRR ESR SSSR SS 


1$1715: 


SCOPE ;CALL_THE SCOPE LOOP UTILITY 
:;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #20, =(SP) 4 


[SET ''T'' BIT IN THE NEW PSW 

MOV #3$,-(SP) MAKE NEW PC = 3$ 

ccc SCOPE SYNC 
2s: RTI ; INSTRUCTION SHOULD SPRING TRAP 
3$: ERROR 5 ;BUT SERVICE IN XXX FAILED 
DUO ICISIOIUIDISIUIDIDIOIUIOIOIIUISIOIUIDIDIUIDIOIOIDIDIDIOIOIOIOIDIOIOIDIDISIDIDIIOIOIDIDIDI DIDI 
i*TEST 716 BUT SERVICE TEST = (JSR %R,@A) 
TDD GIO UIOIIOIOIIOISIISIDIOISIOISIDISIOIUIOIOIOIOIDIOIDIDIDIOIOITIOI II III III IIIT IIT IE 
TST716: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #716,R0 : sLOAD RO WITH TEST NUMBER 


MOV af2$,R1 
. SBTTL ett; CONTROLLED BREAKPOINT == BIT 


LOAD R1 Wwe TEST INSTRUCTION WORD 
1714, @4BPTLOC ; er ar HALT SET ?? 


BEQ +4 

HALT ;BREAK-DEPRESS CONTINUE TO CONTINUE 

MOV SP,R5 7 SAVE THE SP 

MOV PC ,@A#$LPERR ;FOR PROPER SP RESETTING ON ERROR LOOP 
1$: MOV R5,SP ;RESTORE SP FOR ERROR LOOPING 

MOV 43%, DAMBUF 1 ;SET UP POINTER-~DEST ADDR = 3$ FOR JSR 

MOV #20,-(SP) SET "'T'' BIT IN THE NEW PSW 

MOV #2$,-(SP) ;MAKE NEW PC = 2$ 

CCC :SCOPE SYNC 

RTT SET ‘'T'’ BIT = GO TO 2$ 
2$: JSR PC, @MBUF 1 : INSTRUCTION SHOULD SPRING TRAP 
3$: ERROR 5 ;BUT SERVICE IN XXX FAILED 

MOV R5,SP sRESTORE SP IF ALL OK OR NOT LOOPING 
DIO IO IOIUIOIIIOIOIIIOIIIIGIOISIOIOISIOIUIOIOIDIDICIDIDIOIDIOIOIOIOIOIOIOIII III IOIOIOIROII III I 

s*TEST 717 BUT SERVICE TEST - (JMP A) 

PIII IOI IUII IOI ISIOIUIIOIUIOIOIOIOIIOIUIGIOIOIOIOIIOIOIOISIOIIIOIOIOISIOIOIOIIOIOIIOIOIIOIDIOIIIOIG IDI 
1S1717: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #717,RO ;;LOAD RO WITH TEST R 

MOV a42$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #20,-(SP) SET ''T’’ BIT IN_THE NEW PSW 

MOV #2$,-(SP) MAKE _ = 2$ 

CCC : SCOPE SYN 

RTT i SET Fe BIT - GO TO 2$ 
2$: JMP 3$ ;JMP INSTRUCTION SHOULD SPRING TRAP 
3$: ERROR 5 ;BUT SERVICE IN XXX FAILED 


SEQ 0257 


oe es ere aes 


M 4 
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CQKDA=E KD11=K BASIC LOGIC TE 

CQKDAE .P11 17=SEP=79 09:47 T720 BUr SERVICE TEST = (JMP @A SEQ 0258 
13945 TDI II ISIISIICIUIUUIUIDIUIIUIIIDIDIIIOIIOIOIIDIDIIOIOIIOIIDIDIO IDI IDR itt 
13946 :*TEST 720 BUT SERVICE TEST = (JMP @A) 

13947 SL RARE RARER AAR EARRA ERE EEEEREKEEERREREEEEER ERE 
13948 052704 TST720: 

13949 052704 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

13950 052706 012700 000720 MOV #720,R0 +;LOAD RO WITH TEST NUMBER 

13951 052712 013701 052740 MOV a72$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
13952 052716 012737 052744 063316 MOV #3, ZAMBUF O ‘SET UP POINTER=-DEST ADDR = 3$ FOR JMP 
13953 052724 012746 000020 MOV #20,-(SP) ;SET ‘'T’' BIT IN THE NEW PSW 

13954 052730 012746 052740 MOV #2$,-(SP) sMAKE NEW PC = 2$ 

13955 052734 000257 ccc ;SCOPE SYNC 

ipa 052736 000006 RTT ;SET ‘'T’' BIT = GO TO 2$ 

fat 052740 000177 010352 es: JMP @MBUF 0 ;JMP INSTRUCTION SHOULD SPRING TRAP 
eect 052744 104005 3$: ERROR 5 ;BUT SERVICE IN XXX FAILED 

13962 CTR ERE REE REE EEE ERE EERE EERE REE EERE RRR 
13963 »*TEST 721 BUT SERVICE TEST = (RTS PC) 

13964 DRE RRR EERE EERE REE EEEREEEREEKEE REE RERERERRE RE 
13965 052746 TST721: 

13966 052746 000004 SCOPE 7 CALL THE SCOPE oer UTILITY 

13967 052750 012700 000721 MOV #721,R0 LOAD RO WITH TEST NUMBER 

13968 052754 013701 053010 MOV av2$,R1 ‘i OAD R1 WITH TEST INSTRUCTION WORD 
13969 052760 010605 MOV SP,R5 ;SAVE THE SP 

13970 052762 010737 0061010 MOV PC, - @WSLPERR ‘FOR PROPER SP RESETTING ON ERROR LOOP 
13971 052766 010506 1$: MOV R5,5S RESTORE SP FOR ERROR LOOPING 

13972 052770 012746 053012 MOV 13S, © (SP) sRTS WILL LOAD PC WITH 3$ 

13973 052774 012746 000020 MOV #20,-(SP) 7SET *'T’' BIT IN THE NEW PSW 

13974 053000 012746 053010 MOV #2$.-(SP) [MAKE NEW PC = 2$ 

13975 053004 000257 ccc s SCOPE SYNC 

if ada 053006 000006 RTT SET ‘T'' BIT = GO TO 2$ 

Hf ada 053010 000207 es: RTS PC :RTS INSTRUCTION SHOULD SPRING TRAP 
Hf «' 053012 104005 3$: ERROR 5 ;BUT SERVICE IN XXX FAILED 

13982 SII III IOI IID DE RE RRR knit 
13983 S*TEST 722 ALU ADD FUNCTION TEST 

13984 7 THIS TEST VERIFIES THAT THE ALU ADD FUNCTION CAN RESPOND CORRECTLY 
13985 *T0 THE 8 POSSIBLE COMBINATIONS THAT COULD OCCUR AI THE INPUTS OF 
ita? ;EACH OF THE 16 BIT POSITIONS AS DESCRIBED BELOw: 

13988 ; AIN BIN CIN 

13989 

13990 0 0 0 

13991 0 0 1 

13992 0 1 0 

13993 0 1 1 

13994 1 0 0 

13995 1 0 1 

13996 z 1 1 0 

13997 : 1 1 1 

13998 

13999 ;THE TEST NO.S ALONG WITH THE mee ANSWERS ARE STORED IN A TABLE 
14000 ; TAGGED "“ALUADD"' AS SHOWN BELOW 


i at Saas Se aR 





CQKDA-E KD11-K BAS 


CQKDAE .P11 


053014 


053050 
053052 


053054 
053056 


053072 


me 
| ie 
ou 
won 
— 
nm 


17S 


060103 
021503 
001766 
011504 
014502 
104010 


005725 
000761 


012737 053022 001010 


N 4 
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1722 ALU ADD FUNCTION TEST SEQ 0259 


MA 


;ALUADD: 


=) 
wn 
—~ 
oO 
Uv 
— 


ETC. 


AFTER REPORTING Hy # ERROR THE ROUTINE WILL LOCK ON THE FAILING PAIR 
OF NO.S IF SWO9=1 OR GO ON TO THE NEXT PAIR IF SWO9=0. 


TER SEEERERSSELLSCLOSE SEES ER REESE SEER RRR S RRR R RRS RASA RS RRR RR ARR RSE SO 


1$1722: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #722,R0 ;;LOAD RO WITH TEST NUMBER 
1$: MOV MALUADD +4 ,R5 #R5 POINTS TO TABLE OF NO.S 

MOV PC ,@#$LPERR >LOOP ONLY ON FAILING PAIR OF #°S 

CMP -(R5),-(R5) *RESET R5 TO POINT TO BAD GUYS 

: (OR NULL ENTRY FIRST TIME THROUGH) 

4$: TST (R5)+ *POINT TO A SRC OP 

CMP #ALUADD +62 ,R5 ;DONE ALL NO.S IN TABLE ? 

BEQ 5$ ;BR IF sas 

MOV (R5)+,R1 ;LOAD SRC OP 

MOV (R5)+,R3 LOAD DEST OP 

CCL + SCOPE SYNC 
2s: ADD R1,R3 7 TEST THE ADD FUNCTION 

CMP (R5) ,R3 ; CORRECT SUM ? 

BEQ 4$ :GO ADD NEXT PAIR IF YES 

MOV (R5) ,R4 :GET S / B SUM . 

MOV -(R5) ,R2 ;GET DEST OP 
3$: ERROR 10 ;ALU ADD OPERATION FAILED 

TST (R5)+ s CORRECT RS POINTER 

BR 4$ :GO DO NEXT PAIR 
5$: MOV #1$,a4$LPERR ;LOOP FROM BEGINNING ON ERROR 
DLA RARER E RE ERE EEE AREERAEERAERERE EEE AEEEERERERERERA EEE 
Z*TEST 723 ALU SUB FUNCTION TEST 


; THIS TEST VERIFIES THAT THE ALU ADD FUNCTION CAN RESPOND CORRECTLY 
310 THE 8 POSSIBLE COMBINATIONS THAT COULD OCCUR AT THE INPUTS OF 
EACH OF THE 16 BIT POSITIONS AS DESCRIBED BELOW: 


: AIN BIN CIN 
f 0 0 0 
: 0 0 1 
: 0 ’ 0 
é 0 1 1 
: 1 0 0 
7 1 6 1 
s 1 1 0 





ce ee 


CQKDA-E KD11-K BAS! 
17=SEP= 


CQKDAE .P 11 


053116 
053120 


053140 
053142 


053144 
053146 
053150 


053152 
053154 


053156 


021503 
001766 


011504 
014502 
104010 


005725 
000761 


012737 


8 5 
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1723 ALU SUB FUNCTION TEST 


1 1 1 


sTHE TEST NO.S ALONG WITH THE CORRECT ANSWERS ARE STORED IN A TABiF 
; TAGGED "'ALUADD'’ AS SHOWN BELOW: 


;ALUSUB: 


;AFTER REPORTING THE ERROR THE ROUTINE WILL LOCK ON THE FAILING PAIR 
;OF NO.S IF SWO9=1 OR GO ON TO THE NEXT PAIR IF SWO9=0. 


SERRA RAAEREEREARARREERERAAERRERAERAEAEAEAEKEAAARERRKEKEEEE 


1$1723: 
= CALL THE SCOPE LOOP UTILITY 

#723,RO0 ;;LOAD RO WITH TEST o~— 
1$: #ALUSUB+4 ,R5 =R5 POINTS TO TABLE OF NO.S 

PC ,@A#$LPERR ;LOOP ONLY ON FAILING PAIR OF #°S 

-(R5),-(R5) CRESET RS TO POINT TO BAD GuyYS 

;(OR NULL ENTRY FIRST TIMF THROUGH) 

4$: (R5)+ =POINT TO A SRC OP 

M#ALUSUB+62,R5  ;DONE ALL NO.S IN TABLE ? 

5$ ‘BR IF YES 

(R5)+,R1 ;LOAD SRC OP 

(R5)+,R3 ;LOAD DEST OP 

:SCOPE SYNC 


R1,R3 i: TEST THE SUB FUNCTION 


(R5) ,R3 ; CORRECT DIFF. ? 
4$ [GO SUB NEXT PAIR IF YES 


(R5) ,R4 :GET S / B DIFF 
(R5) ,R2 GET DEST OP 
10 ;ALU SUB OPERATION FAILED 


(R5)+ ; CORRECT R5 POINTER 
4$ :GO DO NEXT PAIR 


053106 001010 5$: #1$, Q4$SLPERR ;LOOP FROM BEGINNING ON ERROR 


Fa dakalalahalathalalolalahaletalalabateteledatalaiebalalaipletelelabalstaiaieleietelsialeleisleieielsbelaielptelbeielaialota 
TRTEST 724 ALU ‘‘AND’’ FUNCTION TEST USING BIC INSTRUCTION 
THIS TEST VERIFIES THAT THE ALU ‘‘AND'' FUNCTION RESPONDS CORRECTLY 

[TO ALL POSSIBLE COMBINATIONS FOR EACH OF THE 16 BIT POSITIONS 

71T EXECUTES THE BJC INSTRUCTION FOR THE FOLLOWING PAIRS OF 

;OPERANDS AND TESTS FOR THE INDICATED RESULT: 


SOURCE OP DEST. OP RESULT 


7000009 90000 000000 
317777 77777 000000 


SEQ 0260 





CQKDA-E KD11-K BAS 


CQKDAE .P11 


053220 
053222 


053224 
053226 


053230 
053232 
053234 


053236 
053240 


053242 


17=-S 


020315 
001766 


011504 


012737 053172 001010 


me 
b ake 
3 


000724 
063424 
001010 


063502 





. 
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1724 AND’* FUNCTION TEST USING BIC INSTRUCTION SEQ 0261 

; 000000 177777 177777 
2177777 000000 000000 

3125252 125252 0000 
3052525 052525 000000 
3125252 052525 052525 
3052525 125252 125252 


;THE 8 PAIRS OF NO.S AND THE ANSWERS ARE STORED IN A TEBLE TAGGED 
3" AND TABY’ Seems _—— PATTERN: 
: L 


;AFTER REPORTING THE ERROR THE ROUTINE WILL LOCK ON THE FAILING 
;PAIR OF NO.S IF SWO9=1 OR GO ON TO TEST THE NEXT PAIR IF SwO9=0 


TTT TTT TTT TT TTTT TITTLE LLL LLL LLL LLL 


1$1724: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #724,R0 :LOAD RO WITH TEST NUMBER 
1$: MOV HAND TAB+4 RS RS POINTS TO TABLE OF TEST NO.S 
MOV PC, a#$LPERR “LOOP ONLY ON FAILING PAIR OF #'°S 
CMP =(R5) ,-(R5) ‘RESET RS TO POINT TO BAD Guys 
*(OR NULL ENTRY FIRST TIME THROUGH) 
4$: TST (RS)+ =POINT TO A SOURCE OPR 
CMP HANDTAB+62,R5  :DONE ALL COMBINATIONS ? 
BEQ 5$ [BR IF YES 
MOV (R5)+,R1 SLOAD THE SRC OP 
MOV (R5)+.R3 “LOAD THE DEST OP 
CCC :SCOPE SYNC 
2$: BIC R1,R3 :TEST THE '‘AND'' 
CMP R3, (R5) :RESULT CORRECT ? 
BEQ 4$ “BR IF YES - GET THE NEXT PAIR 
MOV (R5) .R4 :GET THE S / B DATA 
MOV =(R5) ,R2 :GET DEST OP 
2$: ERROR 10 SALU ‘'AND'' FAILED 
TST (RS) + = CORRECT RS POINTER 
BR 4$ *GO GET NEXT PAIR 
S$: MOV #1$,Q4SLPERR |; LOOP FROM BEGINNING ON ERROR 
TORRES SESESASLSSAESAESEASAESESASASAELESLASESEL SELES ERE SESE RRS ARR SSR RRR RS SD 
SeTEST 725 ALU “DR'' FUNCTION TEST USING BIS INSTRUCTION 


THIS TEST VERIFIES THAT THE ALU ‘OR'' FUNCTION RESPONDS CORRECTLY 
;TO ALL POSSIBLE COMBINATIONS FOR EACH OF THE 16 BIT POSITIONS 
SIT EXECUTES THE BIS INSTRUCTION FOR THE FOLLOWING PAIRS OF 
OPERANDS AND TESTS FOR THE INDICATED RESULT: 


om, 
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CQKDA=E KD11=k BASIC IC TESTS macy 30A(1052) 17-SEP-79 09:55 PAGE 263 
CQKDAE .P11 17=SEP=79 09:47 1725 ALU "OR" FUNCTION TEST USING BIS INSTRUCTION SEQ 0262 






121% ; SOURCE OP DEST. OP RESULT 

14171 3000000 000000 000000 

14172 3177777 177777 177777 

14173 3000000 177777 177777 

14174 3177777 177777 

14175 3125252 125252 125252 

14176 3052525 052525 052525 

14177 3125252 052525 177777 

wi 3052525 125252 177777 

4 

14180 ; THE 8 PAIRS OF NO.S AND THE ANSWERS ARE STORED IN A TABLE TAGGED 
1418) 7" ORTAB’’ IN THE FOLLOWING PATTERN: 

14182 ;ORTAB: NULL 

14183 ; SRC OP1 

14184 DST OP1 

14185 ANS1 

14186 SRC OP2 

14187 DST OP2 

14188 4 ANS2 

14189 . ETC. 

14190 

14191 ;AFTER REPORTING THE ERROR THE ROUTINE WILL LOCK ON THE FAILING 
14192 ;PAIR OF NO.S IF SWO9=1 OR GO ON TO TEST THE NEXT PAIR IF SwO9=0 
14193 DDO I ISIIIIOIIOIIOIOIDIOIDIDIOIOIOIUIOIOIOIOIOIOIOIUIOIOIOIOIIOIOIIOIIIOIIIDIDIIOII IIIS II III 
14194 053250 TST725: 

14195 053250 000004 SCOPE :CALL_ THE SCOPE LOOP UTILITY 
14196 053252 012700 000725 MOV #725,R0 >;LOAD RO WITH TEST NUMBER 

14197 053256 012705 063504 1$: MOV #ORTAB+4 ,R5S ;RS5 POINTS TO TABLE OF TEST NO.S 
14198 053262 010737 001010 MOV PC ,@4$LPERR ;LOOP ONLY ON FAILING PAIR OF #S 
14199 053266 024545 CMP -(R5) ,-(R5) ;RESET RS TO POINT TO BAD GuYS 
14200 ;(OR NULL ENTRY FIRST TIME THROUGH) 
14201 053270 005725 6$: TST (R5)+ :POINT TO A SOURCE OPR 

14202 053272 022705 063562 CMP MORTAB+62,R5 ;DONE ALL COMBINATIONS ? 

14203 053276 001413 BEQ 5$ :BR IF YES 

14204 053300 012501 MOV (R5)+,R1 ;LOAD THE SRC OP 

14205 053302 012503 MOV (R5)+,R3 ;LOAD THE DEST OP 

py 053304 000257 ccc :SCOPE SYNC 

rg 053306 050103 2$: BIS R1,R3 ; TEST THE ‘OR'’ 

14210 053310 020315 CMP R3,(R5) ;RESULT CORRECT ? 

HH 053312 001766 BEQ 4$ 7BR IF YES = GET THE NEXT PAIR 








14213 053314 011504 MOV (R5) ,R4 :GET hens " / B DATA 

14214 053316 014502 MOV -(R5) ,R2 GET DEST OP 

oy th 053320 104010 3$: ERROR 10 sALU POR FAILED 

14217 053322 005725 TST (R5)+ CORRECT RS POINTER 

oy Be 053324 000761 BR 4$ :GO GET NEXT PAIR 

14220 053326 012737 053256 001010 5$: MOV #1$,a4$LPERR ;LOOP FROM BEGINNING ON ERROR 







14222 TIO IOIIOIIOIIOIDIOIOIIUIIOIIDIDIOIUIUIUIOIO IODC DR nt tt 


14223 T*TEST 726 INC / DEC / ADD TEST - CYCLE NO.S 000000-077777 
THIS TEST COMBINES THE INC / DEC / ADD INSTRUCTIONS IN THE FOLLOWING 
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CQKDA-E KD11=-K BASIC LOGIC TESTS MACY11 30A(1052) 
CQKDAE .P11 17=SEP=79 09:47 1726 INC / DEC / ADD TEST = CYCLE NO.S 000000-077777 

14225 : TEST SEQUENCE: 

14226 

14227 31. BOTH SOURCE AND DEST OPS ARE ZEROED 

14228 32. THE TWO NO.S ARE ADDED AND THE RESULT COMPARED WITH OO00C. 
14229 33. THE SOURCE OP IS INCREMENTED 

14230 34. THE DEST OP IS DECREMENTED 

14231 75. STEPS 2,3, AND 4 ARE REPEATED UNTIL THE SOURCE OP GOES 
1OSee ; NEGATIVE 

MASee ;ON DETECTION OF A NON-ZERO RESULT THE ERROR IS REPORTED AND THEN IF: 
14236 1. SWO9=0 THE TEST IS EXITED 

s+ 14 é 2. SWO9=1 THE ROUTINE LOCKS ON THE FAILING PAIR OF OPERANDS 
14239 DD RI i RE ERE RRR ER Ret 
14240 053334 TST726: 

14241 053334 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 

14242 053336 012700 000726 MOV #726,R0 ;;LOAD RO WITH TEST NUMBER 

14243 053342 005001 10$: CLR R1 INITIALIZE REGS TO 000000 

14244 053344 005002 CLR R2 

14245 053346 005004 CLR R4 

14246 053350 010737 001010 MOV PC ,@A$LPERR ;LOOP ONLY ON FAILING PAIR OF #'S 
14247 053354 010203 1$ MOV R2,R3 ;LGAD DEST OPERAND 

4 053356 257 CCC :SCOPE SYNC 

14250 053360 060103 23 ADD R1,R3 ;ADD THE TWO TEST NO 

oy 7 ;RESULT S / B = 000000 

14253 053362 020403 CMP R4,R3 ;RESULT = 000000 ? 

\eS26 053364 001402 BEQ 4$ ;BR IF YES 

Hyg] 053366 104010 3$ ERROR 10 ; INCORRECT RESULT IN R3 

yg t= 053370 000407 BR TST727 scEXIT TO NEXT TEST 

14260 053372 005201 4$ INC R1 ;ADD 1 TC SOURCE OP 

14261 053374 100402 BM! 5$ 7GET OUT IF IT WENT NEGATIVE 

14262 053376 005302 DEC R2 ;SUB 1 FROM THE DEST OP 

oer 53400 000765 BR 1$ :GO ADD THE TWO NO.: 

ore 053402 012737 053342 001010 5$: MOV #10$,@4$LPERR ;LOOP FROM BEGINNING ON ERROR 

14267 DOI UII IOI IIOIIOIOIIIOIIIOIOIDIOIIIOIUIOIOIDIOIUIOIUIOIIIOIDIIIOINIIIOIIIUIOIIOIOIUIOIDIUIOIOIIIOIOI IOS 
14268 s*TEST 727 INC / DEC / ADD TEST - CYCLE NO.S 077777-000000 
14269 ;THIS TEST COMBINES THE INC / DEC / ADD INSTRUCTIONS IN THE FOLLOWING 
py 14 3s TEST SEQUENCE: 

14272 31. BOTH SOURCE AND DEST OPS ARE ZERO 

14273 32. THE TWO NO.S ARE ADDED AND THE RESULT COMPARED WITH Q000U0 
14274 33. THE SOURCE OP IS DECREMENTED 

14275 34. THE DEST OP IS INCREMENTED 

14276 75. STEPS 2,3, AND 4 ARE REPEATED UNTIL THE DEST. OP GOES 

py 14 ; NEGATIVE 

14279 7ON DETECTION OF A NON-ZERO RESULT THE ERROR IS REPORTED AND THEN [F: 


SEQ 0263 





orn 


CQKDA=E KD1i=-K BAS 
CQKDAE .P11 


053520 
053522 
053524 


053542 


ICL 
17=SEP=7¢ 


070205 
100403 
001402 
102401 
103001 
104044 
020304 
001002 
020102 


053416 


000730 
053522 


000006 
000002 
006003 


001010 


001076 


MACY11 30A(1052) 265 
/ DEC / ADD TEST = CYCLE NO.S 077777-000000 


1727 


1$172?: 


10$: 


1$: 


2$: 


3$: 


4$: 


5$: 


INC 


5 
17-SEP-79" 09:55 — 


1. SWO9=O0 THE TEST IS EXITED 
2. SWO9=1 THE ROUTINE LOCKS ON THE FAILING PAIR OF OPERANDS 


MEORRRRRRESASRALASLERLESESSER REESE SERRE RRR RRR RRR ARERR RRA RAR RAR RRR RES SE 


a THE SCOPE LOOP UTILITY 
#727,R0 ;LOAD RO WITH TEST NUMBER 
R1 S INITIALIZE REGS TO 000000 


R2 
RG 
PC, @ASLPERR ;LOOP ONLY ON FAILING PAIR OF #'S 
R2,R3 ;LOAD DEST OPERAND 
sSCOPE SYNC 
R1,R3 ;ADD THE TWO TEST NO.S 
RESULT S/B= 000000 
R4,R3 sRESULT = 000000 ? 
4$ ;BR IF YES 
10 ; INCORRECT RESULT IN R3 
TST730 3:G0 TO SCOPE EXIT 
R2 :ADD 1 TO DEST. OP 
5$ ;GET OUT IF IT WENT NEGATIVE 
R1 ;SUB 1 FROM THE SOURCE OP 
1$ ;GO ADD THE TWO NO.S 


#10$,@4$LPERR ;LOOP FROM BEGINNING ON ERROR 


SIRE ARERR EAE EEERERARARREREAEAAERRERERAAARRRARRREE RH 


;*TEST 730 


PPPS R RR RE SSSR RR SERS ESE R ERE SER ERE RRR R RRR RRR RRR RRA EAR R RASA RRR ARES SS 


151730: 


2$: 


3$: 
4$: 


MUL RA,RB TEST ; N:C = 11117 


= CALL THE SCOPE LOOP UTILITY 
#730,R0 ;LOAD RO WITH TEST NUMBER 


pees, av$ TMPO :GET TEST INSTRUCTION WORD 
3S/B RESULT IN R2 

8, R4 ;S/B_ RESULT IN R3 

#2,R2 INITIALIZE REG 

R3 S INITIALIZE REG + 1 

#3,R5 INITIALIZE SRC 
; SCOPE SYNC 

R5,R2 3TEST THE MUL 

3$ 3N:C=0000? 

3$ 

3$ 

4$ 

44 ;COND CODES SET IMPROPERLY 

R3,R4 ;REG*+1 CORRECT? 

5 ;BR NOT 


$ IF 
R1,R2 REG CORRECT? 





SEQ 0264 


me) 
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CQKDAE .P1 i 


053544 
053546 


053550 


053702 
053704 
053706 
053710 


17=SEP=79 09:47 


007401 
106045 


020304 
1002 


00 
02010e 
001401 


104045 


070225 
100403 
001002 
102401 
103001 


000731 
053612 


123450 
012345 


063316 
000010 


000732 
053700 


177777 
063316 
000010 


001076 


001076 


G 5 
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7730 MUL RA,RB TEST ; N:C = 11717 
BEQ TS1T731 ;;BR IF YES 
5§: ERROR 45 sMUL DELIVERED WRONG RESULT 


TRAP RSRERSSEESLLSSE ERR ESSERE RARER RR ERASER RRR RRR RRR RRR RRR RRR RRR RRR SEES 


SeTEST 731 MUL (RA),RB TEST ; N:C = OO00-SET C 


s MRERARAAARAARAAAEKEAAHRARRAAARARARRRARARRRAARRARARREERAURARARANS 


TS1731: 
SCOPE + CALL THE SCOPE LOOP UTILITY 
MOV #731,R0 ;LOAD RO WITH TEST NUMBER 
MOV a4 2$, aS TMPO GET TEST INSTRUCTION WORD 
CLR Ri 3S/B RESULT IN R2 
MOV #123450,R4 3S/B RESULT IN R3 
MOV #012345,Re Z INITIALIZE REG 
CLR R3 s INITIALIZE REG + 1 
MOV AMBUFO,RS SET UP POINTER TO SRC 


MOV #10,(R5) s INITIALIZE SRC 

CCC sSCOPE SYNC 
2s: MUL (R5) ,R2 sTEST THe MUL 

I 3$ =N:C=0001? 

BEQ 3$ 

BVS 3$ 

BCS 4$ 
33: ERROR 44 ; COND CODES SET IMPROPERLY 
S$: CMP R3,R4 ;REG+1. CORRECT? 

BNE 5$ “BR IF NOT 

CMP R1,Re en CORRECT? 

BEQ TST732 ;;BR IF YES 
5$: ERROR 45 s;MUL DELIVERED WRONG RESULT 
ee een ee rere ee eRe ee eS ee ee 
SSTEST 732 MUL (RA)+,RB TEST ; N:C = QO00-SET Z 
bd ebbGOSSSORETEOR SEE 4002 0460006080080006088600880080880868Es000008 
1$1732: 

SCOPE 7 CALL THE SCOPE LOOP UTILITY 

MOV #732,R0 ;LOAD RO WITH TEST NUMBFR 


MOV ae 2$ , AS TMPO GET TEST INSTRUCTION WORD 


CLR R1 3S/B RESULT IN R2 
CLR R4 >S/B_RESULT IN R3 
CLR R2 INITIALIZE REG 


“SET UP POINTER TO SRC 
“INITIALIZE SRC 


MOV #MBUFO,RS 
MOV #10,(R5) 


a SCOPE SYNC 
2$: MUL (R5)+,R2 TEST THE MUL 

AM] 3$ 3N:C=0100? 

BNE 3$ 

BvS 3$ 





SEQ 0265 


_—_— 


CQKDA=E KD11=k BAS 
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053712 
053714 


053722 
053724 


053726 
053732 


053734 


054012 
054014 


054016 
054020 


054026 
054030 


054032 
054036 


054040 


054042 
054042 
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022705 
001401 


104046 


070235 


100003 
001402 
102401 
103001 
104044 
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001401 
104045 


022705 
001401 


104046 


000004 


063320 


000733 
054004 001076 
177777 
177770 
000001 


063312 
177770 063516 


063314 


MACY11 30A(+052) 
1732 MUL (RA) 


ERROR 


De TEST 733 
151733: 


2$: MUL 


3$: ERROR 
S$: CMP 


5$: ERROR 
6$: CMP 


46 ;AUTO INCREMENT DID NOT OCCUR 
° STEST 733. UL @(RA)*.R@ TEST « MC = OOOO-SET N : SAC.DST = 
MUL @(RA)+,RB TEST ; = QOOOO-SET N ; SRC,DST = -, 
. i ROT Tw cate soe Rte le Bins Soe ne sts HR Bate Tn dite 

7 CALL THE SCOPE LOOP UTILITY 

#733,R0 LOAD RO WITH TEST NUMBER 

a4 2$,a4STMPO ier TEST ‘a Vie WORD 

#-1,R1 :S/B RESULT INR 

#-10,R4 +S/B RESULT IN R3 

#1,R2 s INITIALIZE REG 

R3 sINITIALIZE REG + 1 

MATA+10,R5 ;SET UP POINTER TO POINTER TO MBUFO 

4-10, J4MBUFO ZINITIALIZE SRC 
:SCOPE SYNC 

a(R5)+,R2 TEST THE MUL 

3$ 2N:C=1000? 

3$ 

3$ 

4$ 

44 :COND CODES SET IMPROPERLY 

R3,R4 ;REG+1 CORRECT? 

5$ ;BR IF NOT 

R1,R2 sREG CORRECT? 

6$ ;BR IF YES 

45 ;MUL DELIVERED WRONG RESULT 

MATA+12,R5 :DID RS GET AUTO-INCREMENTED? 

TST734 ;7;BR IF YES 

46 Z;AUTO INCREMENT DID NOT OCCUR 


ERROR 
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+,RB TEST ; N:C = QOO0-SET 7 


as COND CODES SET IMPROPERLY 
R3,R4 :REG+1 CORRECT? 

5$ IF NOT 

R1,R2 “REG CORRECT? 

6$ “BR IF YES 

45 [MUL DELIVERED WRONG RESULT 


AMBUF 0+2 RS :DID RS GET AUTO=INCREMENTED? 
TS1733 ::BR IF YES 


LTA E AEA EREREAARAE ARERR AREER 


S*TEST 734 


MUL -(RA),RB TEST ; N:C = 1177-CLR ALL BUT N ; SRC,DSK = +,- 


ett h eee ee eee RRR RRR RRR RRR RRR RRR ERR RRR RRR RRR RRR RE RE RRR SEE EES SE | 


1S1736: 
SCOPE 


CALL THE SCOPE LOOP UTILITY 


segs 


es 
STS + Si 30A(1052) 17=SEP=79 09:55 PAGE 268 
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CQKDAE .P11 17=SEP=79 09:47 1734 MUL -(RA),RB TEST ; N:C = 111717=CLR ALL BUT N ; SRC,DSK = +,- SEQ 0267 
14449 054064 012700 000734 MOV #734,R0 LOAD RO WITH TEST NUMBER 

14450 054050 013737 054110 001076 MOV a4 2$ , aS TMPO ‘ET TEST INSTRUCTION WORD 

14451 054056 012701 177777 MOV #-1,R1 ;S/B RESULT IN R2 

14452 054062 012704 177770 MOV #-10,R4 :S/B RESULT IN R3 

14453 054066 012702 177777 MOV #-1,R2 ; INITIALIZE REG 

14454 054072 005003 CLR R3 : INITIALIZE REG + 1 

14455 054074 012705 063320 MOV AMBUF 0+2,R5 :SET UP POINTER TO SRC 

14456 054100 012737 000010 063316 MOV #10, d04MBUFO ZS INITIALIZE SRC 

peg 2 054106 000277 SCC : SCOPE SYNC 

rete 054110 070245 23: MUL -(R5) ,R2 ; TEST THE MUL 

14461 054112 100003 BPL 3$ 3N:C=1000? 

14462 054114 001402 BEQ 3$ 

14463 054116 102401 BVS 3% 

Leper | 054120 103003 BCC 4$ 

raat 054122 106044 3$: ERROR 44 :COND CODES SET IMPROPERLY 

14468 054124 020304 43: CMP R3,R4 ;REG+1 CORRECT? 

14469 054126 001002 BNE 5$ ;BR IF NOT 

14470 054130 020102 CMP R1,R2 ;REG CORRECT? 

acre 054132 001401 BEQ 6$ ;BR IF YES 

eh 054134 104045 5$: ERROR 45 7MUL DELIVERED WRONG RESULT 

14475 054136 022705 063316 6$: CMP #MBUFO,RS yf SRC REG GET AUTO-DECREMENTED? 
7 054142 001403 BEQ TST735 ;;BR IF YES 

ee 054144 104046 ERROR 46 ;AUTO DECREMENT DID NOT OCCUR 
14480 SRE RAR REAR REAR ERA EERE RRERAEEEREAEEREERERE ERE 
14481 Se TEST 735 MU' @-(RA),RB TEST ; N:C = 11117=CLR ALL BUT C ; SRC.DST = -,- 
14482 , SRR ERR ERR EERE EERE RARER RERERAEEREERE REED 
14483 054146 1$1735: 

14484 054146 000004 SCOPE 7 CALL THE SCOPE LOOP UTILITY 
14485 054150 012700 000735 MOV #735.,R0 ;LOAD RO WITH TEST NUMBER 

14486 054154 013737 054214 001076 MOV a4 2S, a#$TMPO GET TEST INSTRUCTION WORD 

14487 054162 005001 CLR R1 3S/B RESULT IN R2 

14488 054164 012704 106420 MOV #106420,R4 :/$/B RESULT IN R3 

14489 054170 012702 177776 MOV #-2,R2 ZS INITIALIZE REG 

14490 054174 012703 177777 MOV #-1,R3 Zs INITIALIZE REG + 1 

14491 054200 012705 063314 MOV MATA+12,R5 7SET UP POINTER TO POINTER TO MBUFO 
14492 054204 012737 134570 063316 MOV #-43210,a4MBUFO ; INITIALIZE SRC 

wet Sy 054212 000277 scc ;SCOPE SYNC 

ered 054214 070255 2$: MUL a-(R5),R2 ;TEST THE MUL 

14497 054216 100403 BM! 3$ 3N:C=0001? 

14498 054220 001402 BEQ 3$ 

14499 054222 102401 BVS 3$ 

es 054224 103401 BCS 4$ 

one 054226 104044 3$: ERROR 44 :COND CODES SET IMPROPERLY 

14504 054230 020504 4$: CMP R3,R4 SREG+1 CORRECT? 
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054240 


054242 
054246 


054250 


054252 


054312 
054314 
054320 


054326 
054330 
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007002 
020102 
001401 
106045 


022705 
001401 


104046 


104044 
020304 
001002 


020102 
001401 


104045 


09:47 


063312 


000736 
054314 001076 


012345 
177777 


000737 
054410 001076 


000100 
000010 


063302 
000010 063316 
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1735 MUL @-(RA),RB TEST ; N:C = 1111=CLR ALL BUT C ; SRC,DST = 


BNE 5$ ;BR IF NOT 

CMP R1,R2 ZREG CORRECT? 

BEQ 6$ ;BR IF YES 
S$: ERROR 45 sMUL DELIVERED WRONG RESULT 
6$: CMP MATA+10,R5 ;DID RS GET AUTO=DECREMENTED? 

BEQ TST736 + BR IF YES 

ERROR 46 ;AUTO INCREMENT DID NOT OCCUR 
TL ee 
S*TEST 736 MUL X(RA),RB TEST ; N:C = 1111 TO 0100 
bd  RERERERERERRERERARERRREERERREREREREEERREREERRRARARRRRERERARERES 
1S1736: 

SCOPE : CALL THE SCOPE LOOP UTILITY 

MOV #736,R ;LOAD RO WITH TEST NUMBER 

MOV <a SSTHPO “GET TEST INSTRUCTION WORD 

CLR :S/B RESULT IN R2 

CLR S/B RESULT IN R3 

MOV $612365 .R2 INITIALIZE REG 

MOV #-1,R3 s INITIALIZE REG + 1 

MOV AMBUFO,RS SET UP POINTER TO SRC 

CLR 2(R5) SINITIALIZE SRC 

scc ;SCOPE SYNC 
23: MUL 2(R5) ,R2 TEST THE MUL 

BMI 3$ =N:C=0100? 

BNE 3$ 

BVS 3$ 

BCC 4$ 
3$: ERROR 44 COND CODES SET IMPROPERLY 
4$: CMP R3,R4 sREG+1 CORRECT? 

BNE 5$ ;BR IF NOT 

CMP R1,R2 ;REG CORRECT? 

BEQ TS1737 ;;BR IF YES 
5$: ERROR 45 MUL DELIVERED WRONG RESULT 
DLA ARERR EKER A RRA ERE AARRARE RRR EER R EE ED 
S*TEST 737 MUL @X(RA),RB TEST 
SRA EAA REAR AEERRARAEAEREERRRERHHRRENRARRERRAKR EAE 
TST737: 

SCOPE = CALL THE SCOPE LOOP UTILITY 

MOV #737 ,RO LOAD RO WITH TEST NUMBER 

MOV a4 2$ ,a#$TMPO ‘eer TEST INSTRUCTION WORD 

CLR R1 ;S/B RESULT IN R2 

MOV #100,R4 :$/B RESULT IN R3 

MOV #10,R2 ; INITIALIZE REG 

CLR R3 SINITIALIZE REG + 1 

MOV MATA,RS ;GET POINTER TO TABLE OF POINTERS 


MOV #10, aAMBUF 0 INITIALIZE SRC 
CCC SCOPE SYNC 


SEQ a] 
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054414 


054422 
054424 


054426 


054460 
054462 
054466 
054470 
054472 
054474 


054476 


054510 


054512 


054546 
054550 


054554 
054556 
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070275 
020304 
001002 
020102 
001401 
104065 


001401 
104045 


071227 


100003 
001402 


000740 
054462 
010000 
000001 
020003 


000002 


000741 


177762 


000004 


001076 


001076 


5 
11 30A(1052) 17-SEP-79" 09:55 PAGE 270 


MACY 
1737 MUL @X(RA),RB TEST SEQ 0269 
23: MUL @10(R5) ,R2 ;TEST THE MUL 
CMP R3,R4 ;REG+1 CORRECT? 
BNE 3$ ;BR IF NOT 
CMP R1,R2 : sREG CORRECT? 
BEQ TST740 > ;BR IF YES 
3$: ERROR 45 MUL DELIVERED WRONG RESULT 
ee te ee ee eee eee ee ae ee ee ee 
s*TEST 740 DIV #N,RA TEST ; N:C = 1111 
LIAR RARER AERA REERREEERKEKRERRR EKER AERA AEAEERAEER REED 
TS1740: 
SCOPE 7 CALL THE SCOPE LOOP UTILITY 
MOV #740,R0 ZLOAD RO WITH TEST NUMBER 
MOV aF2$ ,a4$TMPO “GET COPY OF TEST INSTRUCTION 
MOV #010000,R1 :S/B RES IN R2 
MOV #1,R4 :$/B RES IN R3 
CLR R2 ;SET UP REG OPERAND 
MOV #020001,R3 SET UP REG+1 OP 
Scc ;SCOPE SYNC 
2$: DIV #2,R2 sTEST DIV 
BM! 3$ 7N:C=0000? 
BEQ 3$ 
BVS 3$ 
BCC 4$ 
3$: ERROR 44 ;COND CODES SET IMPROPERLY 
4$: C R3,R4 ; CORRECT RESULT IN REG+1? 
BNE 5s “BR IF NOT 
CMP R1,R2 ; CORRECT RESULT IN REG? 
BEQ TST741 ::BR IF YES 
5$: ERROR 45 :DIV DELIVERED WRONG RESULT 
Ms = (SERRE RSRASASEASSZESSESRSASERERRSRE RE RS RRR ESS SARS SERS SESS SRR R SRR SO 
s*TEST 741 DIV #N,RA TEST ; RA NEGATIVE ; N:C = 0000 
t: (Re RSASSASASLESSSER SESE RES ESSER RSE SR SESE SES RRR RSE SES RES SSL ESSA SS SD 
1S1741: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #741,R0 +; LOAD RO WITH TEST NUMBER 
MOV anes a¥$ TMPO 3GET COPY OF TEST INSTRUCTION 
MOV #-3,R1 :S/B RES IN R2 
MOV #-2,R4 7S/B RES IN R3 
MOV #-1,R2 ;SET UP REG OPERAND 
MOV a-14, ,R3 75ET UP REG+1 OP 
CCC ;SCOPE SYNC 
2$: DIV #4 ,R2 : TEST DIV 
BPL 3$ 3N:C=1000? 


BEQ 3$ 
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054560 
054562 


054544 
054566 
054570 
054572 
054574 


054576 


054630 
054632 


054646 


054656 
054660 


054714 
054716 
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102401 
103001 


104044 
020304 
001002 
020102 
001401 


104045 


071227 
100403 
001002 
102401 
103001 
104044 
020304 
001002 
020102 
001401 
104045 


071227 
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000742 
054632 


000001 
000001 


600002 


000002 
000016 


177774 


001076 


001076 
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DIV #N,RA TEST ; RA NEGATIVE ; N:C = 0000 
BVS 3$ 
BCC 4$ 
3$: ERROR 44 ;COND CODES SET IMPROPERLY 
4$: CMP R3,R4 + CORRECT RESULT IN REG+1? 
BNE 5$ IF NOT 
CMP R1,R2 CORRECT RESULT IN REG? 
BEQ TST742 :;BR IF YES 
5$: ERROR 45 DIV DELIVERED WRONG RESULT 


SSAA RARER RARER AARERRER AEA ARAERR EEE HARKER 


SeTEST 742 DIV #N,RA TEST ; N:C = 0000 TO 0100 


SL REAR ARR RREEERRRERREEEER ERA ERE EERE EEREREREERREREE REE EE 


1S1742: 


SCOPE : CALL THE SCOPE LOOP UTILITY 

MOV #742,R0 ;LOAD RO WITH TEST NUMBER 

MOV a4 2$,a4$TMPO “GET COPY OF TEST INSTRUCTION 

CLR R1 3S/B RES IN R2 

MOV #1,R4 3S/B RES IN 83 

CLR R2 ;SET UP REG OPERAND 

MOV #1,R3 ;SET UP REG+1 OP 

CCC + SCOPE SYNC 
2s: DIV #2,R2 sTEST OIV 

BM] 3$ 3N:C=0100? 

BNE 3$ 

BVS 3$ 

BCC 4$ 
3$: ERROR 44 ; COND CODES SET IMPROPERLY 
4$: CMP R3,R4 ; CORRECT RESULT IN REG+1? 

BNE 5$ ;BR IF NOT 

CMP R1,R2 ; CORRECT RESULT IN REG? 

BEQ TST743 77BR IF YES 
5$: ERROR 45 :DIY DELIVERED WRONG RESULT 
DPE EERE REE KEE AKER ERE AERA EERE EKEEE 
SeTEST 743 DIV #-N,RA TEST ; RA POS 
CAAA AREA RERRAEERE RRA AERA ERE EERE EEE 
TS1743: 


SCOPE = CALL THE SCOPE LOOP UTILITY 
MOV #743,RO ;LOAD RO WITH TEST NUMBER 
MOV a eli :GET COPY OF ies INSTRUCTION 


MOV :S/B RES IN R 
MOV #2 ,R4 ;S/B RES_IN R3 
CLR R2 SET UP REG OPERAND 
MOV #14. ,R3 SET UP REG+1 OP 
ccc SCOPE SYNC 

2$: DIV #-4,R2 TEST DIV 


SEQ 0270 
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054722 


054732 


054756 
054762 
054766 
054770 
054772 
054774 


054776 
055002 


055004 
055010 


055016 
055020 
055024 
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012702 
071227 
100424 
001423 
102022 
103421 
012702 
005003 
071227 
100413 
001412 
102011 
103410 
012704 


071227 


013703 
012702 


104001 


000744 
054762 
000002 
177776 
000050 


000005 


177777 


177776 


000003 
000000 


177776 
177776 
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7743 DIV #=N,RA TEST ; RA P 


CMP R3,R4 = CORRECT RESULT IN REG+1? 

BNE 3$ IF NOT 

CMP R1,R2 = CORRECT RESULT IN REG? 

BEQ TST744 BR IF YES 
3$: ERROR 45 ;DIV DELIVERED WRONG RESULT 
DD ARERR AERA RRA RRR RRR EEA EE 
S*TEST 744 DIV TEST - V BIT GETS SET 
:* THIS TEST TESTS THAT THE V BIT CAN BE SET IN ALL THE 
7* POSSIBLE WAYS. SINCE THE INSTRUCTION SHOULD BE ABORTED, THE 
Tad RESULTS CANNOT BE GUARANTEED. FOR THIS REASON, ONLY 
% THE CONDITION CODES ARE CHECKED. 
DTA ERE RARER EERE EERE EERE EERE REE ERR EERE EES 
TST744: 

SCOPE 7 CALL THE SCOPE LOOP UTILITY 

MOV #744,R0 LOAD RC WITH TEST NUMBER 

MOV af#2$,R1 “LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #2 ,R4 7S/B PSW 

CLR asPSwW ;CLEAR OUT OTHER PSW BITS 

MOV #50,R2 ;SET UP REG OP 
2$: DIV #5,R2 7 TEST DIV == SHOULD ABORT 

BM! 3$ 3N:C=0010? 

BEQ 3$ 

BVC 3$ 

BCS 3$ 

MOV #-1,R2 s INITIALIZE REG OP 

CLR R3 sINITILAIZE REG+1 OP 

DIV #-2,R2 7 TEST DIV == SHOULD ABORT 

BM! 3$ 7N:C=0010? 

BEQ 3$ 

BVC 3$ 

BCS 3$ 

MOV #3,R4 7S/B PSW 

DIV #0,R2 : TEST DIV BY 0 == SHOULD ABORT 

BM] 3$ 7N:C=0010? 

BEQ 3$ 

BVC 3$ 

BCS TST745 sc IF ALL OK, THEN EXIT TEST 
3$: MOV a4PSwW,R3 :GET WAS PSwW 

MOV #PSW,R2 iDESTINATION IS PSW 

ERROR 1 ;CONDITION CODES SET WRONG 
SDAA EAR AAR EERE EERE REE E EEA RRA ERE RRR 
seTEST 745 ASH #N,RA TEST ; SHIFT LEFT ; N:C = 0000 TO 1010 


SLATER ARERR AERA ERR AREER ARERR ARERERRERE RARER ARE REED 


SEQ 0271 


; N 5 
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CQKDAE .P11 17-SEP-79 09:47 - 1765 ASH #WN,RA TEST ; SHIFT LEFT ; N:C = 0000 TO 1010 SEQ 0272 
14729 055052 TST745: 

14730 055052 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
14731 055054 012700 000745 MOV #745,R0 +;LOAD RO WITH TEST NUMBER 

14732 055060 013701 055076 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
14733 055064 012704 123450 MOV #123450,R4 75/B RESULT 

14734 055070 012703 112345 MOV #112345,R3 INITIAL REG 

gt 055074 000257 ccc ; SCOPE SYNC 

ptt 14 055076 072327 000003 2$: ASH #3,R3 ;TEST THE ASH 

14739 055102 100003 BPL 3$ 3N:C=1010? 

14740 055104 001402 BEQ 3$ 

14741 055106 102001 BVC 3$ 

pts 055110 103001 BCC 6$ 

ety | 055112 104002 3$: ERROR 2 ; INCORRECT CONDITION CODES 

14746 055114 020304 4$: CMP R3,R4 : CORRECT RESULT? 

14747 055116 001401 BEQ TST746 BF YES 

gy 055120 104002 ERROR 2 “ASH DELIVERED WRONG RESULT 

14750 FF Bkabadalaboplialatalateleobolatabeelaheiptatebobeieiahehabeteloboicialeboietoialehabeebtalaiabydttabeabetts 
14751 s*TEST 746 ASH #N,RA TEST ; SHIFT RIGHT ; N:C = 1000 TO 0101 
14752 WECCTITETTTTTI TITTLE LITLE LLLL LLL LLL LL LLL LLL LL LLL LLL 
14753 055122 151746: 

14754 055122 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
14755 055124 012700 000746 MOV #746,R0 +;LOAD RO WITH TEST NUMBER 

14756 055130 013701 055146 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
14757 055134 005004 CLR R4 :S/B RESULT 

14758 055136 012703 000004 MOV #4 ,R3 Zs INITIAL REG 

14759 055142 000257 ccc ;SCOPE SYNC 

ieee 055144 000270 SEN ;CODES = 1000 

oie 055146 072327 177775 2$: ASH #-3,R3 7TEST THE ASH 

14764 055152 100403 BM! 3$ 3N:C=0101? 

14765 055154 001002 BNE 3$ 

14766 055156 102401 BVS 3$ 

gs 24 055160 103401 BCS 4$ 

rts 055162 104002 3$: ERROR 2 : INCORRECT CONDITION CODES 

14771 055164 020304 4$: CMP R3,R4 = CORRECT RESULT? 

14772 055166 001401 BEQ TST747 ;;BR IF YES 

9 ght 055170 104002 ERROR 2 TASH DELIVERED WRONG RESULT 

14775 FF A cbababelabalphalalalabalaladedalalalelelabebptabebabsioiaielabeielheioiahiebsbolabeielelabialehat bb ibblabb bite 
14776 s*TEST 747 ASH #N,RA TEST ; SHIFT LEFT ; N:C = 1111 TO 1000 
14777 PIRES ICU UOIOIIIOIOIUIUIIOIIOUUOIIUIUUIUIDIDIDIUIUOOOSO ni inronit tts 
14778 055172 181747: 

14779 055172 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
14780 055174 012700 000747 MOV #747 ,RO :;LOAD RO WITH TEST NUMBER 

14781 055200 013701 055216 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
14782 055204 012704 177234 MOV =: #177234,R4 :S/B_RESULT 

14783 055210 012703 123432 MOV #123432,R3 Z INITIAL REG 


14784 055214 000277 SCC SCOPE SYNC 
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14786 055216 
14788 055222 


14790 
14791 055230 
14793 055232 


796 
14797 055240 


14802 055242 


14810 055276 
14812 055300 
14814 055304 

055306 
14816 055310 
14817 055312 
14819 055314 


14821 055316 
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104002 
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001401 
104002 


000004 
012700 
013737 
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005004 
005002 
012703 
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177772 


000750 
Woezee 001076 


147653 


000003 


000751 
055362 001076 


000005 
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1747 ASH #N,RA TEST ; SHIFT LEFT ; N:C = 1111 TO 1000 SEQ 0273 
2s: ASH #-6,R3 ; TEST THE ASH 

BP 3$ 3N:C=1000? ! 

BEQ 3$ 

BVS 3$ 

BCC 4$ 
3$: ERROR 2 ; INCORRECT CONDITION CODES 
4$: CMP R3,R4 ; CORRECT RESULT? 

BEQ TST750 ;;BR IF YES 

ERROR 2 ZASH DELIVERED WRONG RESULT 
SU AAA RAE ERA EERE RARER ERERREREEEEREEEEE ARERR EEE EH 
s*TEST 750 ASHC #N,RA TEST ; SHIFT LEFT ; N:C = 0000 TO 1010 
LL R ERR EERAREEREREE EERE EKER 
TST750: 

SCOPE 7 CALL THE SCOPE LOOP UTILITY 

MOV #750,R0 LOAD RO WITH TEST NUMBER 

MOV a4¥2$ ,a4$STMPO “GET TEST INSTRUCTION WORD 

MOV #123456,R1 3S/B RES IN R2 

MOV #076530,R4 3S/B RES IN R3 

MOV #112345,R2 s INITIALIZE COMBINED 

MOV #147653,R3 : REGISTERS 

CCC ;SCOPE SYNC 
2$: ASHC #3,R2 sTEST ASHC 

BPL 3$ =N:C=1010? 

BEQ 3$ 

BVC 3$ 

BCC 4$ 
3$: ERROR 44 ;COND CODES WRONG 
4$: CMP R1,R2 ;TOP HALF OF RESULT CORRECT? 

BNE 5$ ‘BR IF NOT 

CMP R4,R3 : LOWER _ OF RESULT CORRECT? 

BEQ TST751 ,can If ¥ 
5$: ERROR 45 + ASHC DELIVERED WRONG RES 
° FREAK RRA EERE ERE 
Se TEST 751 ASHC #N,RA TEST ; SHIFT RIGHT ; N:C = 1000 TO 0101 
WEARS SAAAASASLERSASASARSSESESR SESE RES ESE ESSERE EER SRR RRR ERE SESS RSS OY 
TS1751: 

SCOPE = CALL THE SCOPE LOOP UTILITY 

MOV #751,R0 LOAD RO WITH TEST NUMBER 

MOV af2$,a#$TMPO éey TEST INSTRUCTION WORD 

CLR R1 :S/B RES IN R2 

CLR RS 3S/B RES IN R3 

CLR R2 INITIALIZE F pctnenton 

MOV #5,R3 ; REGISTERS 

ccc ;SCOPE SYNC 

SEN ;CODES = 1000 
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14841 055362 073227 177775 
14843 055366 100403 


001002 
14845 055372 102401 
14846 055374 103401 


14848 055376 104044 
14850 055400 020102 
001002 


14854 055410 104045 


14859 055412 
14860 055412 000004 
14861 055414 012700 000752 


14863 055420 032737 100000 
14864 055426 001401 


0554 000000 
14866 055432 013737 055462 
14867 055440 012701 177234 
14868 055444 012704 135275 
14869 055450 012702 123456 
14870 055454 012703 127542 
055460 000257 
14873 055462 073227 177772 
14875 055466 100003 
14876 055470 001402 
14877 055472 102401 
14878 055474 103401 
14880 055476 104044 


14882 055500 020102 
001002 


14886 055510 104045 


063240 


001076 


C 6 
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7751 ASHC #N,RA TEST ; SHIFT RIGHT ; N:C = 1000 TO 0101 
2$: ASHC #-3,R2 ;TEST ASHC 
BM! 3$ 3N:C=0101? 
BNE 3$ 
BVS 3$ 
BCS 4$ 
3$: ERROR 44 ;COND CODES WRONG 
4$: CMP R1,R82 ; TOP HALF OF RESULT CORRECT? 
BNE $ ;BR IF NOT 
CMP R4,R3 ;LOWER HALF OF RESULT CORRECT? 
BEQ TST752 7:BR IF YES 
S$: ERROR 5 ;ASHC DELIVERED WRONG RES 


Ps (ARR RASASLALA RASS SAAR SSSASAASEAASESESARASRALASESS RRS SARA S ESSA S SE SS 


D*TEST 752 ASHC #WN,RA TEST ; SHIFT RIGHT ; N:C = 1111 TO 1000 
SOUS IIIIOIOIUIOIOIDIOIIISOIISIIIUIUIDIOUIOIUISISIIIOIIOIIOIIUIUIIDIUIIUIOUIISIO OUI tt 
1§1752: 
SCOPE “ THE SCOPE LOOP UTILITY 
OAD RO WITH TEST NUMBER 


MOV #752 ,RO 
- SBTTL Tt CONTROLLED BREAKPOINT = _— OBITS 


T15,@4BPTLOC ;BREAKPOINT HALT SET ?? 
BEQ +4 ‘BR IF NOT 
HALT :BREAK-DEPRESS CONTINUE TO CONTINUE 
MOV ay2$,avSTMPO  :GET TEST INSTRUCTION WORD 
MOV #177234,R1 :S/B RES IN R2 
MOV #135275 .RG :S/B RES IN R3 
MOV #123456_R2 S INITIALIZE COMBINED 
MOV #127542_R3 + REGISTERS 
CCC >SCOPE SYNC 
2$: ASHC = #6 ,R2 : TEST ASHC 
BPL 3$ :N:C=1000? 
BEQ 3$ 
BVS 3$ 
BCS 4$ 
3$ ERROR 44 :COND CODES WRONG 
4$ CMP R1,R2 : Top HALF OF RESULT CORRECT? 
BNE 5$ BR IF NOT 
CMP R4,R3 “LOWER HALF OF RESULT CORRECT? 
BEQ TS1753 -;BR IF YES 
5$ ERROR 45 TASHC DELIVERED WRONG RES 


THIS SECTION OF THE MED TESTS EXERCISES CERTAIN SCRATCH 
PAD REGISTERS USING MED READS AND WRITES. THEIR ORIGINAL 
CONTENTS ARE RESTORED BUT: 


kkktkkkkkakekkekeee TMPORTANT NOTE xeeaaxnxeeteeeeentannt 
* * 
* THE CONSOLE MUST NOT !!! BE USED DURING THESE MED * 
* TESTS. NO INTERRUPTS OR TRAPS CAN BE ALLOWED EI THER* 


Bee Be Be Be Be Be Be Be 
se ee ee He RD 


SEQ 0274 





— 
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14982 


055576 
055600 
055602 
055610 


055616 


17=SEP=- 


022626 
012737 
012737 


. 
104014 


LOG 
79 


IC TESTS 
09:47 


177777 


061224 
061126 


177776 


055640 
055640 012700 000753 


177770 
177776 


000004 
000010 


000004 
000010 


MACY11 30A(1052) 
USER CONTROLLED BREAKPOINT =~ BIT 


** 

te  ensunenuiimenenbeenteeeNNNene 
-% 

os Re Re Ae Re eR TT A He Se Be Be Be Be BS TR RR TTT ETT TOR TOTO ROOT hn tt 
T*TEST 753 CHECK MED IS ILLEGAL IN USER - te JN KERNAL 
:* THE NEXT TEST BELOW CHECKS TO SEE THAT "MED" 

.* (MAINTENANCE, EXAM, AND DEPOSIT) INSTRUCTION WILL EXECUTE 
.* WHEN IN KERNEL MODE WITHOUT AFFECTING THE PSwW AND 

* THAT IT IS ILLEGAL IN USER MODE 


° 
Wen AAAS RERRESERRRASEESARARAAAAAA SALAS ARA AR AR RARER REAR A SERRA EADS SD S| 


3;SETUP MISSED TEST & FULL _WRD TEST # PRIOR TO SCOPE 


1S1753: 


S 
MED1: MOV 


MEDO: CLR 
M 


MEDHLT: ERROR 


S*TEST 754 


oe Be ee «&e 
sa» epeeee ee 


TS1754: 
MOV 


D 6 
17=SEP=79 09: $26 PAGE 276 


#752,R0 


#304 , AFUBREAK 
#140000, a#PSW 
AMSTACK, SP 

#2$ ,AMERRVEC 
#2$ , QARESVEC 
#-1,R1 


RO 


(SP)+, (SP) + 
ABERR , AMERRVEC 


ARSERR , @ARESVEC 


avPSw 


#753,R0 


eer THE SCOPE LOOP UTILITY 


;SET SCOPE SYNC FOR MED INSTR 
;GO TO USER MODE 

SETUP USER STACK PTR. 

;SET ERROR TRAP VECTOR TO 2$ BELOW 
;LOAD RESERVED INST. 
;LOAD R1 WITH A -1 
;CLEAR RO 


TRAP VECTOR 


;TRY TO DO MAINT. EXAMINE 


:MED READ CODE 


FOR R1 
RROR - MED INST. NOT ILLEGAL IN USER 
31S RO UNCHANGED? 


BRANCH IF 


YES 
sERROR ~ aa oe WAS EXECUTED 


“RESTORE ERROR TRAP VECTOR 


RESTORE RESERVED INST. 
;GO TO KERNEL MODE,CLEAR COND. CODES 


:DO MAINT. EXAMINE OF R1 


;MED READ CODE FOR R1 


WHICH CAN BE WRITTEN 


sERROR CC-BITS IN PSW AFFECTED BY MED 


TS UIGIUIGI SR IDISISIOISISIIDIDIDIIIDIOIIIDIOIOIUIOIUIUIDIUIUIOIDIDIDIOIUIUIDIOIUIOISIIOIDIDIDIDIDIDIDIDISIDIDIGIDITIOI IDI 
MED TEST - R/wW DATA PATTERNS TO REGS 

THIS PARTICULAR MED TEST WRITES DATA PATTERNS 

TO THOSE INTERNAL REGS. 
AND READ WITHOUT SPECIAL CONSIDERAIONS. 
heed SPECIAL TESTS ARE TESTED IN LATER 
TABLE I] CONTAINS THE REGISTER ADDRESSES. 


A MAX. OF 3 ERRORS ARE REPORTED FOR EACH LOC. 


'WEAAARAGASRSASZAALZELE2 2 SERS ERERRRR SSSR R ERE RRR RRR RRR RRR RRR RRR SRR RRS SS SD | 


REGISTERS 


TRAP VECTOR 


SEQ 0275 


3:SETUP MISSED TEST & FULL WRD TEST # PRIOR TO SCOPE 





CQKDA=E KD11-K BAS 


CQKDAE .P11 


me 
P alk 
y 
. @) 


17*S 


po rer eer SRE 
NO 2 See oo 


013701 


001102 


055742 
000003 


001106 
001102 
001100 


177776 
001102 


001104 


001100 
001106 


i 30A(1052) 


MEDT1: 


1$: 


2$: 
10$: 


11$: 


12$: 


13$: 


14$: 
%$: 


COPE 


E 6 
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#340, a4PSW 
#TBL2,R1 
#125232, aASTMP2 


(R1)+,a#12$ 
aA TMP, 


RO, a#$TMPO 
R1,a4$TMP1 
@FSTMP2 RO 


0 
RO 


0 
RO, a#$TMP3 
a4$TMPO,RO 


0 

ee - @A$TMP3 
a412$,a4$TMP1 
#3, aeSTMPS 

14$ 

22 

OAS TMPS 


aASTMP2 
aA$TMP1,R1 


* CALL THE SCOPE LOOP UTILITY 
;KERNEL MODE=PRIORITY 7 
S INITIALIZE ADDRESS POINTER 


;PUT WRITE CODE BY ‘WRITE-MED'S"’ 


sAND POINT R1 TO READ CODE 
#PUT READ CODE BY ‘READ-MED'S"’ 
R1 NOW POINTS TO NEXT REG. 


SCLEAR ERROR COUNTER 


;MED-READ rose INTERNAL REG. 
;MED=READ C 

:SAVE ITS ORIGINAL CONTENTS 
;SAVE ADDR. PTR. VALUE 

;LOAD RO WITH DATA TO BE WRITTEN 


SMED-WRITE THE TEST DATA 


;MED-WRITE CODE 
CLEAR RO 
[MED-READ THE DATA BACK 
sMED-READ CODE 
SAVE DATA READ FOR COMPARISON 
LOAD ORIGINAL DATA IN RO 
;MED-WRITE ORG. DATA TO REG. 
sMED-WRITE CODE 
;DID DATA READ=DATA WRITTEN? 
;BRANCH IF YES 
SAVE MED-CODE FOR ERROR 

ERROR REPORTS YET? 
BRANCH IF YES 
INT. REG. READ BACK WRONG DATA 


> INCREMENT ERROR COUNTER 
; CHANGE DATA PATTERN 
;RESTORE ADDR. POINTER 


SEQ 0276 
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14985 056024 022737 125252 001102 CMP #125252, aM$TMP2 ;BOTH DATA PATTERNS BEEN USED? 
001327 BNE 2$ BRANCH IF NO 


CH 
14987 056034 005711 TST (R1) END OF ADDR. TABLE? 
Mp 056036 001310 BNE 1$ [BRANCH IF NO 


14990 SIP Aa alteltateRaheha taht heRelalelehalelelaiehelalelalelehahehehshehehatahcheheialaiaiehaheiahaiatehelaieieheishehelelehelehe 


14991 ie TEST 755 MED TEST = VERIFY NOPS; READ R7 IN A & B SP 


THIS TEST CHECKS ALL OF THE ‘NOP"' OPERATION CODES 
TO ENSURE THEY WILL EXECUTE AS NOP'S AND 
NOT RESULT IN A PROCESSOR HANG. THE ‘NOPS'' 


ODES. 
THIS TEST ALSO READS THE PROGRAM COUNTER (R7) VALUES 
STORED IN A & B SCRATCH PADS TO SEE THAT THEY 
READ PROPERLY. THE R7 ADDRESSES ARE IN TABLE IV. 


15001 DUO EEE UIOIUIIIIIDIOOIOOISIIISIIIIOIOIDIIISIIDOOIO INSEE RS 
15002 056040 TST755: 

15003 056040 012700 000754 MOV #754 ,RO 7;SETUP MISSED TEST & FULL _WRD TEST # PRIOR TO SCOPE 
15004 056044 000004 SCOPE CALL THE SCOPE LOOP UTILITY 

15005 056046 012701 064410 MEDT3: MOV #TBL3,R1 INITIALIZE NOP TABLE PTR. (R1) 
15006 056052 112137 056060 1$: MOVB (R1)+,a410$ :PLACE FIRST ‘NOP-CODE"' AFTER MED 
15007 :AND POINT R1 TO LAST CODE IN GROUP 
15008 056056 076600 5$: MED EXECUTE MED WITH NOP OP-CODE 

15009 056060 000000 10$: -WORD 0 

15010 056062 123711 056060 CMPB a#10$,(R1) HAVE ALL_NOPS IN THAT GROUP 

15011 ;BEEN TESTED? 

15012 056066 103003 BHIS 6$ ;BRANCH IF YES 

15013 056070 005237 056060 INC hi :NEXT NOP IN GROUP 


000770 BR 
15015 056076 105721 6$: TSTB (R1)+ ;POINT R1 TO NEXT NOP GROUP 
15016 056100 005711 TST (R1) ;HAVE ALL GROUPS BEEN TESTED 
15017 056102 001363 BNE 1$ ;BRANCH IF NO 


15019 056104 113737 064431 056116 MEDT4: MOVB @AR7A+1 , aA5S ;LOAD R7A READ CODE AFTER MED 
15020 056112 005000 4$: CLR RO CLEAR RO 

15021 056114 076600 MED :MED READ R7 IN THE ASP 

15022 056116 000000 5$: -WORD 0 READ CODE FOR R7A 

15023 056120 020027 056120 CMP ns :DID ty a CORRECTLY? 


1411 ; BRANCH YES 
15625 056126 013737 056116 001100 MOV a#5$,a4$TMP1 3 SAVE MED“ CODE FOR ERROR 
15026 056134 012737 056120 001102 MOV #5$+2,Q4STMP2 =; SAVE DATA EXPECTED 
15027 056142 010037 001104 MOV RO, a#$TMP3 SAVE DATA RECEIVED 
15028 056146 104022 ERROR 22 :R7A DID NOT READ THE oo VAL UE 
15029 056150 023727 056116 000047 6$: CMP OAS$ 447 HAS R7B BEEN CHECKED 
15030 056156 001404 BEQ 8$ “BRANCH IF YES 
15031 056160 113737 064435 056116 MOVB @AR7R+1 , aA5$ LOAD R7B READ CODE AFTER MED 
15032 056166 000751 BR 4$ 7; TEST R7 BSP 
15033 056170 8$: 


— 
3 
aoe epeneneene DE 
a 
i 
m 
~ 
é 
_ 
mn 
_ 
— 
— 
~~ 
zi 
J 
nn 
o 
x 
mn 
wn 
m 
~ 


15036 LLU RARER REE EERE REE REEEEE REAR REE RRR ARER 


15037 i*TEST 756 © MED TEST = CSP CONSTANTS CHECK 


15039 ts THIS TEST CHECKS THE CONSTANT VALUES LOCATED 
15040 :* IN THE C SCRATCH PAD. THE CONSTANTS ARE READ 
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056170 
056170 
056174 


056176 


056212 
056214 


056254 
056256 


056256 


056314 


012700 
000004 


012167 


L961 ¢ TESTS 
09:47 


000755 


004000 


064542 
000006 


056232 
177776 


000756 


000071 
061110 
000340 
061116 


1756 
* 
i: 


. 
PPROP PR RRERESSESSSESE ERS E RR RE R RRR RRR RRR RRR RRS SRR RE RRS RRA R SAAD SSS 


1$1756: 


11$: 


MPR PRAE SESS SSSR SRSES SES ERR ERE RRR R RRR ARREARS RRR RRA RASA RRR RRR RRR DSSS DS 


MED TEST - MICROBK CHECK OF MICRO-POINTS 


THIS TEST USES THE MICROBREAK gp tee AND THE 
INFORMATION IN TABLE V TO CHECK THAT THE 
CORRECT MED-FLOW IS ENTERED WHEN EACH 

REGISTER IS ACCESSED BY A MED INSTRUCTION. 

IS SETUP TO CAUSE A TRAP TO 
LOC. 4 WHEN ITS CONTENTS EQUAL THE ADDRESS 

OF THE MIRCOWORD BEING EXECUTED. 


THE MICRO BREAK - TRAP-TO-4 CAPABILITY 

IS TRIED AT THE BEGINNING OF THE TEST. 

IF IT DOESN'T WORK, AN ERROR IS PRINTED 
AND THE TEST IS SKIPPED 


° 
VPP PRR RRS ESSE SRR ESE SEER ESSER RRR SERRRRA RRR RRA R ARR RR ARR RAR ARR RDS SSD! 


1$1757: 


SeTEST 757 


ee ee ee ee ee ee ee ee ee en ee 
aeeweepeeenneeeee ee 


S 
177770 =MEDT11: 
00004 
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MED TEST = CSP CONSTANTS CHECK 


wITH A MED INSTRUCTION AND COMPARED TO THEIR 
THE ADDRESSES OF THESE CONSTANTS 
AND THE VALUES EXPECTED ARE IN TABLE VII. 


MACY11 30A(1052) 


EXPECTED VALUE. 


3;SETUP MISSED TEST & FULL _WRD TEST # PRIOR TO SCOPE 
;CALL THE SCOPE LOOP UTILITY 


3SET THE ‘'CSP INVALID BIT"' 
sEXECUTE FLT. Pi INST. P 
= CONSTANTS ARE LOADED INTO CSP 


POINTER 
“LOAD MED READ CODE AT 1$ 
;BR IF END OF TABLE 


READ INTERNAL CONTENTS INTO RO 

:WAS THE -< es READ THE ONE EXPECTED 
YES 

[SAVE MEDCODE FOR 


RROR 
SAVE CONSTANT VALUE EXPECTED 
3CSP LOCATION HELD WRONG VALUE 


a41$,a4STMP1 
a6 Ot aS 


THE MICROBREAK REG. 


3; SETUP MISSED TEST & FULL _WRD TEST # PRIOR 10 SCOPE 
CALL THE SCOPE LOOP UTILITY 

;LOAD MICROBK. REG. WITH AN MICRO ADDR. 

;LOAD ADDR. OF MICROBK. ROUTINE 
;LOAD KERNEL PSW - PRIORITY 7 
: CLEAR MI CROBK. 


#SWBO1 , @AUBREAK 


H 6 
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CQKDAE .P11 17=SEP=79 09:4 1757 MED TEST = MICROBK CHECK OF MICRO=POINTS SEQ 9279 
15097 056316 052700 001000 BIS #B1T9,RO SET BIT 9 

15098 056322 076600 MED ;MED-WRITE THE WHAM] REG TO 

15099 056324 000222 10$: WRWHAM J ENABLE M1 CROBK-TRAP-T0=4 

15100 056326 076600 MED GET FLAG REGISTER 

15101 30 000144 RDF LAG 

15102 056332 052700 100000 BIS #B1T15,R0 SET BIT 15 IN RO 

15103 056336 076600 MED sMED-WRITE THE FLAG REG TO 

15104 056340 000344 118: WRF LAG ;ENABLE MICROBK TRAPPING 

15105 056342 000300 SWAB RO :MICROBK TRAP SHOULD OCCUR ON SWABS 
15106 056344 005737 061116 TST | @ABKF LAG :DID TRAP TO 4 OCCUR? 

15107 056350 001007 BNE 1$ ;BRANCH IF YES 

15108 056352 005037 001076 CLR av$TMPO 

15109 056356 016737 121507 001100 MOV SWBO1,@A$TMP1 =; SAVE EXPECTED UBREAK ADDR 

15110 056364 104015 ERROR 15 ;MICROBREAK TRAP DIDN'T WORK 

Weit3 056366 000453 BR 50$ ;SKIP TO END OF TEST 

15113 056370 012701 000710 1$: MOV #SWB01*10,R1 GET CORRECT U-ADDR 

15114 056374 076600 MED GET LOG CUA REG 

15115 056376 900103 RDILCUA 

15116 056400 042700 100007 BIC #100007 ,R0 ;GET RID OF IRRELEVANT BITS 
15117 056404 020001 CMP RO,R1 WAS né UADDR LOGGED? 
15118 056406 001401 BEQ 3$ BR IF YE | 
15119 056410 104025 ERROR 25 3 CUA CONTAINS INCORRECT U-ADDR 
15120 056412 012701 064442 3$: MOV #TBL5S,R1 sINTIALIZE TABLE PTR. (R1) 
15121 056416 012702 064470 MOV #TBL6,R2 

15122 056422 010737 001010 MOV PC ,@#$LPERR SET ERROR LOOP RETURN TO 2$ 

15123 056426 111137 056464 2$: MOVB (R1) ,a4123 ;LOAD WRITE CODE AFTER MED 

15124 056432 001431 BEQ 50$ PR IF END OF TABLE 

15125 056434 011237 177770 4$: MOV (R2) ,@#UBREAK ;LOAD MICROBK REG. WITH MICROADDR. 
15126 056440 005037 061116 CLR @AFBKF LAG :CLEAR MICROBK TRAP-TO-4 FLAG 
15127 056444 076600 MED :GET FLAG REGISTER 

15128 056446 000144 RDF LAG 

15129 056450 052700 100000 BIS #B11T15,R0 ;SET BIT 15 _IN RO 

15130 056454 076600 MED :MED WRITE TO FLAG REG TO 

15131 056456 000344 15$: WRF LAG ENABLE MICROBK TRAPPING 

15132 056460 005000 CLR RO IN CASE U-BREAK TRAP DOESN'T OCCOR 
15133 ;USUALLY BETTER TO WRITE O'S 

15134 056462 076600 MED 

15135 056464 000000 12$: . 0 

15136 056466 005737 061116 TST @ABKF LAG ;DID WE TRAP-TO-4? (FLAG NOT = Q) 
15137 056472 001006 BNE 20$ ;BRANCH IF YES TO NEXT ENTRY 

15138 056474 013737 056464 001076 MOV @412$,a4$TMPO ;SAVE MED-CODE FOR ERROR 

15139 056502 011237 001100 MOV (R2) ,a#$TMP1 SAVE EXPECTED U-ADDR FOR ERROR 
dps 056506 104015 ERROR 15 SMICROBK. TRAP-TO-4 DID NOT OCCUR 
15142 056510 105721 20$: TSTB (R1)+ : INCREMENT TO NEXT TABLE 

15143 056512 005722 TST (R2)+ [ENTRIES AND 

Ht ag 056514 000744 BR 2$ ; CONT INUE 

15146 056516 076600 50$: MED ;GET WHAM] INTO RO 

15147 056520 000022 RDWHAM | 

15148 056522 042700 001000 BIC #B1T9,RO ; CLEAR BIT 9 

15149 056526 076600 MED ;CLEAR THE FLAG REG. TO 

15150 056530 000344 13$: WRF LAG 3 DISABLE MICROBK. TRAPPING 
15151 056532 076600 MED ;CLEAR THE WHAM] REG. TO 

15152 056534 000222 14$: WRWHAM | : DISABLE MICROBK. TRAP-T0-4 


aoe KD11=-K_ BAS 
CQKDAE .P11 17S 
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EP=79 09:47 ? MED TEST = MICROBK CHECK OF MICRO-POINTS SEQ 0280 
153 056536 012737 056264 001010 MOv = #MEDT11, @#SLPERR RESET LOOP ON ERROR POINTER 
34 096564 012737 61224 000004 MOV —- #BERR, a4 ;RESTORE NORMAL ERROR ROUTINE 


R 
— 
vie 
nN~< 


15 

151 

ae 056552 17777 MOV #304, @FUBRE AK [GENERATE SYNC PULSE ON MED INSTR 

15 

19157 

15158 SL EAA AR RARER OKRA RREREERERREAEEEEAEREERRREERAREEEEREEE 
15159 :*TEST 760 PHYSICAL ADDRESS & ODD ADDRESS ERROR LOGGING 

15160 :* THIS TEST CHECKS THAT THE PROPER PHYSICAL ADDRESS SITS 

15161 :* <17:00> ARE LOGGED UPON ERROR. THE ERROR IS CAUSED BY 

15162 i* FORCING AN ODD ADDRESS TRAP. THE ERROR LOG MODE USED 

15163 ;* IS ‘LOG FIRST’. ALSO, THE ODD ADDRESS ERROR BITS IN 

15164 * THE LOG JAM AND CPU ERROR REGISTER ARE CHECKED. 

15165 . FERRARA ERE AREER ERE EERE EEE ERKEERE EEE 
15166 056560 TST760: 

15167 056560 012700 000757 MOV #757,R0 3; SETUP MISSED TEST & FULL WRD TEST # PRIOR TO SCOPE 
15168 056564 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

15169 056566 012737 056626 000004 1$: MOV M23, BAS *SETUP PC FOR ODD ADDR SERVICE 

15170 056574 012737 000340 000006 MOV #340, 346 

15171 056602 012700 100001 MOV #B1T15+BITO,RO ;SETUP ‘LOG FIRST’’ MODE 

15172 0O 076600 MED 

15173 056610 000222 WRWHAM I 

15174 056612 012702 056567 MOV #1$+1,R2 ;SAVE ADDRESS OF ODD ADDR. INSTRUCTION 
15175 056616 005767 177745 TST 1$+1 ;DO ODD ADDRESS INSTRUCTION TO FORCE 
15176 ;A JAMUPP & TRAP TO 4 

15177 056622 104023 ERROR 23 ;#** ODD ADDR. TRAP DID NOT OCCUR 
15178 056624 000441 BR 10$ ‘EXIT TEST 

15179 056626 022626 2s: CMP (SP) +, (SP) + ;RESTORE STACK 

15180 056630 012737 061224 000004 MOV ABERR , aS ;RESTORE OLD PC & PSw 

15181 056636 076600 MED 

15182 056640 000100 RDLJAM 

15183 056642 013701 177766 MOV @ACPUERR ,R1 

15184 056646 032701 000100 BIT #BI1T6,R)1 zWAS ODD ADDR. ERROR RE CORDED BY 
15185 : THE CPU ERROR REGISTER 

15186 056652 001001 BNE 3$ “BRANCH I? Yes 

15187 056654 104024 ERROR 24 :*** CPU ERROR REG. DID NOT 

15188 ;REPORT ODD ADDRESS ERROR 

15189 ;READ THE LOG JAM REGISTER 

15190 056656 032700 100004 3$: BIT #B1T15+BIT2,RO ;WAS ODD ADDR. ERROR LOGGED BY LOG JAM 
15191 056662 001001 BNE 4$ ‘BRANCH IF YES 

15192 056664 104024 ERROR 24 ‘** LOG JAM REG. DID NOT LOG 

leiaz ODD ADDRESS ERROR CORRECTLY 

15195 056666 005005 43: CLR R5 CLR ERROR FLAG 

15196 056670 076600 MED ;READ THE LOG PBA REGISTER 

15197 056672 000102 ; RDLPBA 

15198 056674 010003 MOV RO,R3 ;SAVE RECEIVED PHYS ADDR <15:0> 
15199 056676 020002 CMP RO,R2 sWERE BITS <15:00> OF THE PHYSICAL 
15200 ;BUS ADDR. LOGGED CORRECTLY? 

15201 056700 001401 BEQ 5$ ;BRANCH IF go 

15202 056702 005205 INC RS ;SET ERROR F 

15203 056704 076600 S$: MED ‘READ THE Log. SERVICE REGISTER 

15204 056706 000101 we see 

15205 056710 000300 SWAB RO :GET 'PBA 17816'° DOWN TO BIT POSITION 0&1 
15206 056712 042700 177774 BIC #177774, RO 

15207 056716 001002 BNE 11$ 7BR IF PHYS ADDR BITS <17:16> LOGGED CORRECTLY 


15208 056720 005705 TST R5 PREVIOUS ERROR? 
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012700 
000004 


912701 
005771 
012737 
012711 
012737 


012737 
012737 
005000 


000760 


064052 
000100 
125252 
000001 


057032 
000340 


005022 
000200 


177746 
177746 


000114 
000116 


000114 


+ Se 30A(1052) 
1760 


T1$: 


10$: 
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PHYSICAL ADDRESS & ODD ADDRESS ERROR LOGGING SEQ 0281 


BEQ 10$ ;BR_IF NOT 

CLR R1 sSET UP EXPECTED PA<17:16> 

ERROR 26 z*** PHYSICAL BUS ADDR. <17:00> 
NOT LOGGED CORRECTLY WHEN 

CLR RO :ODD ADDRESS TRAP OCCURRED 

L 
MED DISABLE ‘LOG FIRST'' MODE 
WRWHAM I 


RRR E REET 


S*eTEST 761 


CHECK DISABLE PARITY ERROR TRAP 

;*THIS TEST CHECKS THAT PARITY ERROR TRAPS TO LOCATION 114 
3 *ARE agen | WHEN oits OF THE CACHE CONTROL REGISTER IS 
i*SET (=1). TRAP TO 114 SHOULD NOT OCCUR AND ERROR 

: SINFORMATION SHOULD NOT BE LOGGED IN THE LOG PBA, LOG 
>*CACHE DATA, OR LOG TAG DATA REGISTERS. WRONG PARITY IS 
;*WRITTEN INTO A TEST LOCATION TO CAUSE THE PARITY ERROR 
;*NEEDED IN THIS TEST. 


RRR EERE REE REAR EMRE EERE EERE RRA KERR 


TS1761: 


2s: 


V #760,R0 ::SETUP MISSED TEST & FULL_WRD TEST # PRIOR TO SCOPE 
SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #TLOC1,R1 :GET tre TO TEST LOCATION 
TST (R1) :MAKE IT A HIT 
MOV AWwWP ,aA#CCR : SET WRITE WRONG PARITY BIT 
MOV #125252, (R1) [WRITE TO TEST LOC. WITH WRONG PARITY 
MOV #DPTRP,@ACCR [DISABLE PARITY ERROR TRAPS 

AND CLEAR WwWP 

MOV #1$,a04114 ;SETUP PARITY ERROR VECTOR 
MOV #340,04116 
CLR RO 
MED :CLEAR LOG PBA REGISTER 
WRLPBA 

D ; CLEAR LOG CACHE DATA REGISTER 
WRLDATA t- 
MED ;CLEAR LOG CACHE TAG REGISTER 
WRL TAG 
TST TLOC1 READ TEST ne A. FORCE PARITY ERROR 
BR 2$ ;BRANCH IF NO TRAP OCCURS 
MOV #200,R0 
MED CLEAN UP THE CACHE 
352 EINITIALIZATION CODE 
CMP (SP) +, (SP) + [CLEAN UP S 
ERROR 30 jee PARITY VTRAP TO 114 OCCURRED 

;WHEN IT SHOULD HAVE BEEN DISABLED 

MOV #200,R0 
MED ; CLEAN UP_ THE CACHE 
352 ; INITIALIZATION CODE 
MOV #125252, (R1) [WRITE BAK GOOD PARITY IN TST LOC 
| eerste SRESTORE ORIGINAL PARITY HANDLER & PSW 
CLR R5 ;CLEAR ERROR FLAG 
MED READ LOG PBA REGISTER 
RDLPBA 


~ 


SSS 
Wr 


ee ee ee mt ck ce ee ed ed ed ed ed ed ed ed ed 
SESE 


AMAA AAAA AAA AUT TT 


WWNWWNWNWNWWS 
Ron Ve es 
OOWNAWUSWNH—O 
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057102 





057114 
057116 


057126 
057130 


057140 


057142 


057146 


057250 


057256 
057260 


177746 


000761 
064052 


000340 


177744 





STS 
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MOV RO,R3 SAVE COPY 
;LOG PBA REG. STILL CLEAR? 
BEG 3$ [BRANCH IF YES 
INC R5 OTHERWISE SET ERROR FLAG 
:READ LOG CACHE DATA REG. 


































RO,R1 ;SAVE COPY 
;LOG CACHE DATA REG. STILL CLEAR? 
BEQ 4$ ;BRANCH IF YES 
INC R5 SOTHERWISE SET ERROR FLAG 
4$: MED ;READ LOG CACHE TAG REG. 
RDLTAG 
V RO,R2 ;SAVE COPY 
;LOG CACHE TAG REG. STILL CLEAR? 
BEQ 5$ [BRANCH IF YES 
INC R5 ;OTHERWISE SET ERROR F 
S$: TST RS WERE ANY _* LOG REGISTERS CHANGED 
BEQ 6$ [BRANCH IF NO 
ERROR 27 3*** ONE OF LOG REGISTERS CHANGED 
; WHEN ERROR SHOULD NOT Mwy BEEN LOGGED 
LOG PBA, LOG DATA & LOG TAG 
“REGISTER SHOULD BE CLEAR 
6$: CLR @aACCR ENABLE PARITY ERROR TRAPS 
As (PRR RRSRSESSSSSSSERESESSESS ESE SR SSS SR RSE RSS SERS SERS SELES ESSE SSS SG 
s*TEST 762 CHECK PARITY ERROR BITS IN MEMERR REG. IN SACKUP MODE OF CACHE (TRAP) 
s*THIS TEST CHECKS THAT ALL OF THE PARITY ERROR BITS (5,6,7) 
;*OF THE MEMORY ERROR REGISTER ARE SET TO '1'' WHEN A CACHE 
:*PARITY ERROR OCCURS IN THE BACKUP MODE. 
SLR AEE RAE RE ERE KEE EH 
TST762: 
MOV #761,R0 7zSETUP MISSED TEST & FULL ts TEST #4 PRIOR TO SCOPE 
SCOPE ;CALL THE SCOPE LOOP UTILIT 
MOV #TLOC1,R1 GET tart TO TEST LOCATION 
TST (R1) *MAKE IT HIT 
177746 MOV #WWP,aACCR SET WRITE WRONG PARITY BIT 
MOV #125252, (R1) S WRITE TO TEST LOC. WITH WRONG PARITY 
177746 BIC AWWP ,a#CCR sCLEAR WwWP 
000114 MOV #1$,04114 ;SETUP NEW TEST HANDLER AT PARITY VECTOR 
000116 MOV #340,a4116 
TST @ATLOCT ;READ TEST LOC. fO FORCE PARITY ERROR 
MOV #200,R0 
MED ;CLEAN UP THE CACHE 
352 Z INITIALIZATION CODE 
ERROR 31 3*** PARITY ERROR DID NOT CAUSE TRAP 
BR 2s ;BRANCH TO 2$ 
1$: MOV #200,R0 
MED CLEAN UP THE CACHE 
352 Zs INITIALIZATION CODE 
" CMP (SP) +, (SP) + sCLEAN UP STACK 
177744 2%: CMP #000340, a#MEMERR™ ;WERE PARITY ERROR BITS (5,6,7) SET 
sAND CPU ABORT BIT (15) LEFT CLEAR 
7 IN MEMORY ERROR REGISTER? 
BEQ 3$ *BRANCH IF YES 
MOV @AMEMERR , RO 
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057264 104032 ERROR 32 ;*** MEMORY ERROR REGISTER BITS 
[WERE SET INCORRECTLY 

057266 012737 000116 000114 38: MOV rads Ff 4114 ;RESTORE OLD PARITY HANDLER PC & PSwW 

057274 005037 000116 CLR awilé 


: 3 (PRP SRRRASSSASSASR ESSER ASASARR RSE SLE SER ARERR SESE SERRE SARS RES SS 


S*TEST 763 CHECK UNIBUS TIMEOUT, ODD ADDRESS AND LOG CONTINUOUS MODE 


s*THIS TEST CHECKS THAT THE ‘UNIBUS TIMEOUT'' BIT 7 oon 
7*GETS SET IN THE CPU ERROR REGISTER WHEN A TIMEOUT OCC 
;*A TIMEOUT TRAP IS FORCED BY REFERENCING BUS ADDRESS 30000. 
:*THEN AN ODD ADDRESS ERROR IS FORCED AND IT 
7*I1S CHECKED IF ONLY BIT (6)-ODD ADDRESS ERROR IS SET 
+ * (IN CPUERR). THIS CHECKS THAT THE ERROR LOG IS 
; *CONTINUOSLY UPDATED IN THE ‘LOG CONTINUOUS'* MODE. 

SLA RRRREERRRERERER EEE KEEEREEEEREKERERREEREERREEEEKK EE 

1S1763: 

012700 000762 MO #762,R0 : 3 SETUP MISSED TEST & FULL WRD TEST # PRIOR TO SCOPE 


057330 000004 CHGD1: , ; SETUP 
000006 MO : TIMEOUT SERVICE ROUTINE 
057322 0 #160000 :FORCE A TIMEOUT TRAP TO 4 BY 
057326 REFERENCING NON-EXISTENT ADDRESS 


WWNWWWWWWWNWAWWS 
BIRARAYSS 


W 


ODNAUSWM—O”O 


6$ 
1$: (SP)+,(SP)+ RESTORE STACK 
061224 d ABERR , a4 sRESTORE OLD PC & PSW FOR TIMEOUT 


34 
34 
34 
%4 
34 
34 
34 
34 
34 
34 


177766 @ACPUERR ,R1 SAVE CPU ERR REG 

057350 022701 000020 #B1T4,R1 DID ‘‘UNIBUS TIMEOUT’’ BIT IN CPU ERROR 
REGISTER GET SET? 

057354 001401 2$ BRANCH IF YES 

057356 104033 33 ;*** “UNIBUS TIMEOUT’ BIT ag IN CPU 
SERROR REG. DID NOT SET WHEN A 
; TIMEOUT WAS FORCED 
;READ THE LOG JAM REGISTER 

LAREN 


057360 021200 2$: CMP #B11T13+BIT9+BIT7,RO ;DID ‘UNIBUS TIMEOUT'’ BIT (BIT7) SET?  CHGD1 
PRR EK 
057364 BEQ 3$ ;BRANCH IF YES 
057366 ERROR 33 3*** "UNIBUS TIMEOUT’ BIT (BIT7) 
:DID NOT SET IN LOG JAM REGISTER 
WHEN UNIBUS TIMEOUT WAS FORCED 
057370 : READ LOG PBA 


160000 | laa WAS PHYS BA LOGGED CORRECTLY? 

160000 MO #160000 ,R1 
20 ;PHYSICAL BUS ADDRESS WAS 

LOoure ON A UNIBUS 

057432 000004 : B4S a4 ;SET UP PC,PSw FOR ODD ADDRESS 

000340 000006 #340 ,a46 

177741 3$+1 :FORCE ODD ADDRESS ERROR 


000420 6$ 
057432 022626 : ¢ (SP)+,(SP)+ RESTORE STACK 
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CQK P11 


DAE .P 


SESERSRERESS 


Ww 
Ye) 
= 


—OCOONOUSWH— 


Ww 
RR 
% 


057460 


057462 
057466 
057470 


057472 


057540 
057542 


057570 
057572 
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012737 
6600 


000100 
013701 
032701 


001001 
104035 


061224 


177766 
000100 


000004 


000004 


000763 
057544 


177746 


061224 


177766 
000001 


000004 


000004 
000006 


000004 


MACY11 30A(1052) 
7763 


7$: BIT 


6$: MED 
RDLFGINT 
CMPB 
BEQ 
ERROR 


8$: 
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285 
CHECK UNIBUS TIMEOUT, ODD ADDRESS AND LOG CONTINUOUS MODE 


ABERR , a44 


@FCPUERR ,R1 
#B1T6,R1 

7$ 

a) 


4 31T2,R0 
6$ 
24 


ODD ADDR. BuT SET 3 


;ODD ADDRESS BIT WAS 
:NOT SET IN THE CPU 


; ERROR REGISTER. a LOG 
CONTINUOUS MADE THE 

“LATEST ERROR SHOULD 

:BE LOGGED 

: ODD po BIT SET IN 


;LOG 
[ODD ADDRESS BIT WAS 
NOT SET IN THE LOG 


[JAM REGISTER ON A 


;O0DD ADDRESS ERROR 
;CHECK IF LAST INTERRUPT VECTOR 
[WAS LOGGED? 


;LAST ERROR VECTOPR WS NOT LOGGED 


SL AER AAR REEREEERER EE RRRERREKREERRERAEEKKEEREREEEEEEEEAREREREEEH 


CHECK ILLEGAL INTERNAL ADDRESS TRAP 


;*THIS TEST CHECKS THAT A TRAP OCCURS UPON REFERENCING AN 
;*ILLEGAL_ INTERNAL ADDRESS AND THAT “ILLEGAL INTERNAL ADDRESS'' 
:*BIT (BITO) OF THE CPU ERROR REGISTER AND BITS OF LOG JAM 


*TEST 764 


; *REGIST 


ER GET SET. 


IT ALSO CHECKS IF THE INTERRUPT VECTOR 


:*(4) IS SAVED AS THE ‘LAST INTERRUPT VECTOR’ IN THE LOG 


;*FLAG/INTERRUPT REG. 


| => ygemeauaaaaaaanamaraaaenemaneeenemeamaie 


* 


TST764: 


#763,RO 


#1$,a44 
#340, a46 
a¥CCR 
ACCR,PC 
34 


3$ 
(SP)+, (SP) + 
MBERR , 044 


@A4CPUERR ,R1 
#BITO,R1 


2$ 
35 


3;SETUP MISSED TEST & FULL _WRD TEST # PRIOR TO SCOPE 
:CALL_THE SCOPE LOOP UTILITY 
; SETUP NEW HANDLER PC & PSW 


; ILLEGAL INTERNAL ADDRESS TRAP SHOULD OCCUR 


:*** ILLEGAL INTERNAL ADDRESS 
:DID NOT RESULT IN A TRAP 
BRANCH TO EXIT IF NO TRAP 
RESTORE STACK 

RESTORE OLD HANDLER PC & PSw 


:DID “"ILLEGAL INTERNAL Hye tie BIT (0) 
3 IN CPU ERROR REGISTER GET S 
BRANCH IF YES 


:e*s ILLEGAL INTERNAL ADDRESS 


SEQ 0284 
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;BIT 4° NOT SET IN CPU ERROR REG. 
;READ THE LOG JAM REG. 

057574 032700 000040 : BIT #B1T5,RO DID ‘‘ILLEGAL INTERNAL ADDRESS’ BIT (5) 

IN LOG JAM REG. GET SET 

057600 001001 BNE 3$ BRANCH IF YES 

057602 104035 ERROR 35 ;*** ILLEGAL INTERNAL ADDRESS BIT 
[DID NOT SET IN LOG JAM REG. 

057604 3$: 


Z LARA ERE REAR ERE EERE REERREREREEERERRRRERREE EERE 
:*TEST 765 CHECK LOG SERVICE & MEMERR LOGS LO-HI BYTE & TAG, IN CACHE ABORT MODE 
: TEST CHECKS THAT ‘LO BYTE PARITY’' ‘HI BYTE PARITY'* AND “TAG PARITY*' 
=BITS CAN SET IN ‘LOG yg ge REGISTERS. IT IS ALSO 
; CHECKED | THAT THE PROPER TAG AND DATA BITS GET STORED 
IN THE ‘LOG CACHE DATA, ‘LOG CACHE TAG/CPU"' AND THE 
: MEMORY ADDRESS REGISTER'’ WHEN A PARITY ERROR IS 
LIT IS CHECKED IF THE INSTRUCTION WAS ABORTED AND THE 
a en REGISTER LOGGED THE LAST INTERRUPT 
iV “ 
SLATE RRR EEE ERE ERE EERE ERE EERE EERE ERR 
057604 1ST765: 
057604 012700 000764 MO #764,R0 Zi SETUP MISSED TEST & FULL WRD TEST #4 PRIOR TO SCOPE 
057610 000004 ;CALL THE SCOPE LOOP UTILITY 


057612 012737 177746 ADPTRP+PABORT,@ACCR ;DISABLE PARITY TRAPS (CACHE) 
5037 a#$RE GO 
#TLOC1,R1 ;GET POINTER TO TEST LOC. 
Ad :MAKE IT A HIT 
177746 CCR WRITE WRONG PARITY SET 
7135382, (RI) [WRITE TEST LOCATION WITH WRONG PARITY 
177746 M#WWP , aACCR SCLEAR WP 


#B1T15+81T0,RO 
ENABLE ‘LOG FIRST’ MODE, AND 
I ;ERROR LOGGING 
177746 #DPTRP .aa&CCR SENABLE CACHE PARITY TRAPS 
#PTRP” ,aM114 TNEW PARITY TRAP SERVICE 
TLOC1,@#$REGO ;READ TEST LOC, FORCE PARITY ERROR 


#200,R0 
: CLEAN UP THE CACHE 
INITIALIZATION CODE 
057714 31 y**® CACHE PARITY ERROR TRAP 
DID NOT OCCUR WHEN 
sTEST LOC WITH BAD PARITY 
S READ 


ZENTER HERE IF PARITY TRAP OCCURRED 


CLEAN UP THE CACHE 
SINITIALIZATION CODE 
177746- #DPTRP,aaCCR DISABLE CACHE PARITY ERROR TRAPS 
000114 oe adele “REESTABLISH OLD SERVICE VECTORS 
(SP)+,(SP)+¢ 
057750 005737 aF$RE GO WAS THE INSTRUCTION ABORTED ON 


057716 ; #200,R0 
MED 
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15489 sta PARITY ERROR (ABORT MODE)? 
15490 057754 001401 BEQ 1$ 
15491 057756 104041 ERROR 41 ‘INSTRUCTION HAVING CACHE PARITY 
15492 SERROR WAS NOT ABORTED, IN THE 
15493 ;CACHE ABORT MODE. 
15494 057760 076600 1$: MED ;READ THE ‘LOG SERVICE’’ REGISTER 
15495 057762 000101 RDLSERVICE 
15496 057764 010004 MOV RO, ; COPY 
15497 057766 042704 177435 BIC #*C<LO*HI +TAG+BITI>, R4 ;MASK ALL BUT LO,HI,TAG BITS 
15498 057772 022704 000342 CMP #342,R4 LO.HI .TAG, CACHE PARITY BITS SET? IN ‘‘SERVICE’’ 
15499 057776 001401 BEQ 2s :YES 
15500 060000 104042 ERROR 42 fo "LO BYTE’’ PARITY ERROR 
75501 e- F PARITY ERROR BITS 
15502 :GERE NO LOGGED web! IN _ 
15503 SERVICE ar tal WHEN PARIT 
15504 ZERROR TRAP WAS FORCED. 
15505 ;CLEAR BITS ARE ACTIVE. 
15506 060002 013700 177744 2$: MOV @AMEMERR , RO ;GET he ERR REG 
15507 060006 022700 100340 CMP #HI+LO+TAG*BIT15, -RO ;DID''LO BYTE** "HI BYTE’’ AND *'TAG"’ 
15508 ‘PARITY, ERROR BITS SET IN 
15509 [THE MEMORY ERROR REGISTER? 
15510 060012 001401 BEQ 3$ YES 
15511 060014 104043 ERROR 43 z*** "LO BYTE’ ‘HI BYTE’’ AND ‘TAG’ PARITY 
15512 ERROR BITS DID NOT SET 
15513 CORRECTLY IN THE MEMOR 
15514 s ERROR REGISTER 
15515 060016 076600 3$: MED ;READ ‘LOG PBA’* REGISTER 
15516 060020 000102 RDLPBA 
15517 060022 020027 064052 CMP RO,ATLOC1 DID *'LOG PBA’’ CONTAIN CORRECT 
15518 PHYSICAL BUS ADDRESS-WHERE 
15519 + THE PARITY ERROR OCCURRED? 
15520 060026 001403 BEQ 4$ YES 
15521 060030 012701 064052 MOV #TLOC1,R1 VEXPECTED PBA 
15522 060034 104020 ERROR 20 ;x** PHYSICAL BUS ADDRESS 
15523 (WHERE PARITY ERROR OCCURRED) 
15524 :WAS NOT LOGGED CORRECTLY 
15525 WHEN CACHE PARITY ERROR WAS FORCED 
15526 060036 076600 4$: MED 
15527 060040 000107 RDLTAG ZREAD ‘LOG CACHE TAG'’ REGISTER 
15528 060042 000300 SWAB RO 
15 060044 012701 064052 MOV A#TLOC1,R1 SHIFT RIGHT (3 TIMES) THE 16 BIT 
15530 060050 000301 SWAB R1 
15531 060052 106201 ASRB R1 PHYSICAL BUS ADDRESS OF THE 
15532 060054 106201 ASRB R1 TEST LOCATION 
15533 060056 106201 ASRB R1 
15534 052701 000200 BIS #B1T7,R1 FUDGE TAGE BIT 
15535 060064 120100 CMPB R1,RO ;WAS THE CORRECT TAG LOGGED? 
15536 060066 001401 BEQ 5$ ;YES 
15537 060070 104017 ERROR 17 :TAG BITS WERE NOT LOGGED 
15538 CORRECTLY, WHEN CACHE 
15539 “PARITY ERROR WAS FORCED 
15540 060072 076600 5$: MED READ CACHE DATA 
15541 060074 000106 RDLDATA 
15542 060076 020027 125252 CMP RO,4125252 CACHE DATA LOGGED CORRECTLY? 
15543 060102 001403 BEQ 
15544 060104 012701 125252 MOV #125252,R1 EXPECTED DATA 
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ERROR 16 
000001 : ns #B1TO,RO SET UP LOG CONTINUOUS 


WRWHAM I 
060134 Vv P SETUP CPU VECTOR 
160000 00 :FORCE TIMEOUT & TRAP TO 7$ 
: (SP) +, (SP)+ 
061224 BERR , 044 RESTORE CPU VECTOR 
MED READ LOG FLAG/INTERRUPT REGISTER 
RDLFGINT 


000114 id ;DID LO BYTE CONTAIN VECTOR 114? 
001062 MOV RO, @#SREGO 
ERROR 36 LAST INTERRUPT VECTOR WAS NOT 
;LOGGED CORRECTLY IN FLAG REGISTER 
Del CACHE PARITY ERROR WAS 


8$: 


BRO IIIOIISISIIIUIDIDIOIIOIOIIISISIOIIOIUIOIOIOIDIDIDIIOIUIUIDIOIIOIDIDIDI IDIOT IDIDI TIED 
T*TEST 766 CHECK "LOG FIRST’* MODE OF ERROR LOGGING 
;*THIS TEST CHECKS THE ‘LOG FIRST'’ MODE OF ERROR LOGGING. 
:*THE "LOG FIRST'’ MODE IS ENABLED. THEN A TIME-OUT TRAP 
:*IS FORCED, BIT 4 OF CPU ERROR REGISTER SHOULD BE SET. 
; CED. “pag! THIS 


; BE LOGGED; BIT 6 (ODD 
> *ADDRESS) SHOULD NOT BE SET BECAUSE THE ERROR LOG 
;*IS LOCKED UP AFTER THE FIRST ERROR. 


;* THEN, THE ERROR LOG IS ENABLED (BY SETTING BIT AA OF 
;*WHAMI). AN ODD ADDRESS ERROR IS FORCED AGAIN AND IT IS 
:*CHECKED THAT THIS TIME THE ERROR IS LOGGED, (BIT 6-ODD 
:*ADDRESS SHOULD BE SET IN CPU ERROR REGISTER). 
a we wages Go acim tat saat aaeaeearee ammeter i 
TST766: 
012700 000765 #765,RO 7;SETUP MISSED TEST & FULL _WRD TEST # PRIOR TO SCOPE 
000004 :CALL THE SCOPE LOOP UTILITY 


100001 MOV #B1T15+BITO,RO ;SET UP ‘LOG FIRST MODE 


060224 000004 ist UP NEW PC & PSW FOR 
000340 000006 MOV iB as ad 
160000 “FORCE A TIMECUT 

5$ SKIP TEST IF NO TIMEOUT 


022626 : (SP) +, (SP)+ RESTORE STACK 
:BIT 4 OF CPU ERROR REGISTER 
+ SHOULD HAVE SET 
012737 060242 000004 H2$ ,aA4 SET UP NEW PC FOR ODD A atin 
005767 177765 1$+1 SFORCE ODD ADDRESS TRAP 
000453 5$ [SKIP TEST IF NO ODD ADDRESS TRAP 


022626 : (SP) +, (SP)+ RESTORE STACK 
012737 061224 006004 AMBERR , a44 
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28 MED 
RDLJAM 


000100 
013701 177766 MOV @ACPUERR ,R1 
022701 000920 CMP #B1T4,R1 ;"'TIMEOUT’’ BIT SHOULD BE STILL 


;SET, CHECK? 

001402 BEQ 3$ 

104033 ERROR 33 ;*** SECOND ERROR (ODD ADDRESS) 
[UPDATED THE ERROR LOG IN 
;THE LOG FIRST MODE. BIT 4 
; (UNIBUS TIMEOUT) SHOULD BE 
sSTILL SET FROM THE FIRST 


ERROR 
0004 36 5$ 7SKIP THE REST 
032700 : #81T2+B1T15,RO ;CHECK THAT ODD ADRES ERROR BITS NOT 
001401 6$ :SET IN LOG JAM. NOTE LOG FiRST 
;MODE SHOULD INHIBIT FURTHER 
ERROR LOGGING 
104037 37 : ODD ADRESS ERROR BITS GOT SET IN LOG JAM 
THEY SHOULD NOT BE SINCE LOG FIRST MODE 
SINHIBITS ERROR LOGGING AFTER THE FIRST ERROR 
012700 : #B1T15+BI1TO,RO ;ENABLE ERROR LOG AGAIN IN 
;LOG FIRST MODE 


YY 
RRRRRARRARK 
and aad anh ad ah an aad ech am anh 


BERS 


N 


076600 


000222 

012737 000004 A4$ aM ;SET UP NEW PC & PSW FOR 
012737 000006 #340 ,a46 ODD ADDRESS ERROR 

tty 177741 3$+1 ;FORCE ODD ig TRAP 


yw 
nO 
Nm 

UOEW 


a a a kd dd od ot 3 


000415 5$ :SKIP IF NO 
022626 : (SP) +, (SP)+ SRESTORE STACK 


RESTORE OLD PC(4), PSwW(6) 
012737 061224 000004 


ABERR , a4 
022737 000100 177766 #BIT6,aACPUERR ;THE ERROR LOG FROM PREVIOUS 
[ERROR SHOULD BE OVER WRITTEN. 
:ODD ADDRESS BIT SHOULD 
BE SET, ay | THE ERROR 
5$ LOG G WAS ENABLED 
IF YES 


177766 MOV @A4CPUERR ,R1 
40 >THE ERROR LOG WAS NOT UPDATED 

; (UPON AN ODD ADDRESS ERROR) 

SAFTER THE LOG WAS 2 

;AT THIS FORMAT BIT 6 O 

;CPU ERROR eecisres SHOULD 

[BE SET. IT WAS NOT. 

012737 061224 000004 : ABERR, a4 “RESTORE OLD Hay PSW(6) 

012700 000001 MOV #BITO,RO 

076600 MED 3g ap LOGGING BACK INTO 

000222 WRWHAM | ONT INUOUS'* MODE 


CIARA RARER ERE EEE EERE EERE E RETAKE REE 


i*TEST 767 CHECK LAST INTRRUPT VECTOR IS LOGGED IN FLAG REG. 


SERRE EEE REE REE REE ERE EERE ERE 
1S1767: 
012700 MOV #766,R0 3:SETUP MISSED TEST & FULL WRD TEST # PRIOR TO SCOPE 








060412 


7-SEP=- 
000004 
012737 
104000 


012700 


3 


061624 
060446 
160000 
061224 


000030 


060502 


061264 
060524 
160000 


061224 


000020 


000767 


000030 


000030 
000004 


000004 


000020 


000020 
000004 


000004 


001126 
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CHECK LAST INTRRUPT VECTOR IS LOGGED IN FLAG REG. 


SCOPE CALL THE SCOPE LOOP UTILITY 
MOV #1$,3730 ;LOAD EMT VECTOR WITH i 
EMT FIRST INTERRUPT == EM 
1$: CMP (SP)+, (SP) + CLEAN UP STACK 
MOV #SERROR , 0430 RESTORE VECTOR 
MOV #23044 SET UP CPU VECTOR 
TST a4#160000 ;FORCE TIMEOUT 
2$: CMP (SP) +, (SP) + CLEAN UP STACK 
MOV ABERR , a4 [RESTORE BUS ERROR VECTOR 
D : CHECK FLAG 
RDLFGINT 
C RO,430 ;EMT VECTOR LAST LOGGED? 
BEQ 3$ BR IF YES 
ERROR 36 ;LOG FLAG/INT REG DID NOT LOG VECTOR 
;LO BYTE OF LOG FLAG/INT REG S/B=30 
3$: MOV #4$ ,a4#20 ;LOAD IOT VECTOR WITH 4$ 
IOT SECOND INTERRUPT=SHOULD LOAD LOG FLAG REG 
4$: CMP (SP)+,(SP)+ CLEANUP STACK 
MOV #SSCOPE , a#20 RESTORE IOT VECTOR 
MOV 5S, aa4 ;SET UP CPU VECTOR 
TST #160000 sFORCE TIMEOUT 
5$: CMP (SP)+,(SP)+ CLEAN UP STACK 
MOV #BERR. ans RESTORE BUS ERROR VECTOR 
MED CHECK FLAG 
RDLFGINT 
CMPB RO,420 :I0T VECTOR LAST LOGGED? 
BEQ 6$ :BR IF YES 
ERROR 36 ;LOG FLAG/INT REG DID NOT LOG VECTOR 
;LOW BYTE S/B = 20 
6$: MOV #$TN-1,RO :SET UP FOR MISSED TEST CHECK AND 
;FULL WORD TEST NUMBER FOR APT 
ENABLE AMA 
-SBTTL END OF PASS ROUTINE 


DDO SIGIOUISISISIIUIDIDISIOIIOIOIOISIOIIIDISIOIOIOIDIOIDIUIUIDIDIOIDIDIDIDIOISIUIIDIDIUOIUIUIDIDISISIUIDIOINII IDOE 
;* INCREMENT THE PASS NUMBER ($PASS) 

:*IF THERES A MONITOR GO TO IT 

;*IF THERE ISN'T JUMP TO INIT 


SEOP: 


$EOPCT: . 


$ENDCT: 


SCOPE 
CLR $TIMES 33ZERO THE NUMBER OF ITERATIONS 
INC $PASS ;; INCREMENT THE PASS NUMBER 


BIC #100000,$PASS ::DON'T ALLOW A NEG. NUMBER 
(PC) + 3; LOOP? 


1 
BGT $DOAGN s*¥ES 
MOV attri :zRESTORE COUNTER 


. WORD 
$EOPCT 


SEQ 0289 
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15713 060610 104401 065107 TYPE EOP 1 ; TYPE ‘END PASS @#°' 

18714 060614 013746 001126 MOV $PASS ,-(SP) ;SAVE $PASS FOR TYPOUT 
15715 060620 104402 A TYPOC ; TYPE PASS NUMBER IN, OCTAL 
15716 060622 104401 065125 TYPE EOP2 ; TYPE ‘ERROR COUNT = 

15717 060626 013746 001012 MOV SERTTL,-(SP) * SAVE ERROR TOTAL FOR TYPOUT 
15718 060632 104402 TYPOC s TYPE ERROR TOTAL 

15719 060634 104401 001115 TYPE ,$CRLF 

15720 060640 013700 000042 $GET42: MOV a442,R0 ;iGET MONITOR ADDRESS 
15721 060644 001405 BEQ $DOAGN 7 BRANCH IF NO MONITOR 
15722 060646 000005 RESET 7 CLEAR THE WORLD 

15723 060650 004710 SENDAD: JSR PC, (RO) 3:GO TO MONITOR 

15724 060652 000240 NOP 77 SAVE ROOM 

15725 060654 000240 NOP 37FOR 

15726 060656 000240 NOP sACT11 

15727 060660 $DOAGN: 

15728 060660 000157 JMP a(PC)+ 7 RETURN 

15729 060662 003266 $SRINAD: WORD INIT 


COQ $ENULL: . ;ZNULL CHARACTER STRING 
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CQKDA=E KD11=« BASIC LOGIC TE 

CQKDAE .P11 17=SEP=79 99:47 END OF PASS ROUTINE SEQ 0291 
15732 comune ~\ ar tet tar aa ae ee ee ee 
15733 win £ ££ ££ ff ¢ MUIR 4 Fe OF / 
rie 4 = RIO OU SO DUD ODDO GOULD OU OUUDDODOGOD DOD IURID IDO IOIDUIUE 
12738 .SBTTL POWER DOWN AND UP ROUTINES 

15738 SRR REE AEE RARE EERE RAE RERERE EERE RE REE ES 
15739 POWER DOWN ROUTINE 

15740 060670 012737 061042 000024 $PWRDN: MOV M$SILLUP,@APWRVEC ;;SET FOR FAST UP 

15741 060676 012737 000340 000026 MOV #340, a#PWRVEC+2 ;:PRIO:7 

15742 060704 010046 MOV RO, =(SP) >: PUSH RO ON STACK 

15743 060706 010146 MOV R1,-(SP) ;zPUSH R1 ON STACK 

15744 060710 010246 MOV R2,-(SP) 7 ZPUSH R2 ON STACK 

18745 060712 010346 MOV R3,-(SP) 72PUSH R3 ON STACK 

15746 060714 010446 MOV R4,-(SP) ;PUSH R4& ON STACK 

15747 060716 010546 MOV R5,-(SP) 72PUSH R5 ON STACK 

15748 060720 017746 120114 MOV @SWR ,- (SP) : «PUSH @SWR ON STACK 

15749 060724 010637 061046 MOV SP, S$SAVR6 :zSAVE SP 

15750 060730 012737 060742 000024 MOV #SPWRUP, @APWRVEC :;SET UP VECTOR 

15751 060736 000000 HALT 

12235 060740 000776 BR 2 3 HANG UP 

15754 PLR EER EERE REE A ee 
15755 ;POWER UP ROUTINE 

15756 060762 012737 061042 000024 $PWRUP: MOV MSILLUP,@APWRVEC ;;SET FOR FAST DOWN 

15757 060750 013706 061046 MOV SSAVR6, SP 3:GET SP 

15758 060754 005037 061046 CLR $SSAVR6 3zWAIT LOOP FOR THE TTY 

15759 060760 005237 061046 1$: INC SSAVR6 zzWAIT FOR THE INC 

15760 060764 001375 BNE 1$ ::0F WORD 

15761 060766 011600 MOV (SP) ,RO ;GET OLD SWR VALUE 

15762 060770 076600 MED [WRITE BACK ORIGINAL SWR VALUE 
15763 060772 000226 WCNSSW 3 INTO HARDWARE SWITCH REGISTER 
15764 060774 012677 120040 MOV (SP)+,@SWR >:POP STACK INTO aSWR 

15765 061000 012605 MOV (SP)+,R5 3zPOP STACK INTO R5 

15766 061002 012604 MOV (SP)+,R4 3zPOP STACK INTO R4 

15767 061004 012603 MOV (SP)+,R3 3zPOP STACK INTO R3 

15768 061006 012602 MOV (SP)+,R2 ;2:POP STACK INTO Re 

15769 061010 012601 MOV (SP)+,R1 : ¢POP STACK INTO R1 

15770 061012 012600 MOV (SP)+,RO POP STACK INTO RO 

15771 061014 012737 060670 000024 MOV #SPWRDN, @4PWRVEC i 3SET UP THE POWER DOWN VECTOR 
15772 061022 012737 000340 000026 MOV #340, QUPURVEC +2 7¢PRIO:7 

15773 061030 104401 TYPE ‘REPORT THE POWER FAILURE 

15774 061032 061050 SPWRMG: .WORD $POWER ;;POWER FAIL ME SSAGE : -POINTER 
15775 061034 012716 MOV (PC) +, (SP) sRESTART AT PWRUP 

15776 061036 061060 $PWRAD: .WORD PWRUP RESTART ADDRESS 

15777 061040 000002 RT] 

15778 061042 000000 $ILLUP: HALT 32 THE POWER UP SEQUENCE WAS STARTED 
15779 061044 000776 BR owe 3; BEFORE THE POWER DOWN WAS COMPLETE 
15780 061046 000000 $SAVR6: 0 ;2PUT THE SP HERE 

15781 061050 005015 047520 042527 $POWER: .ASCIZ <15><12>° POWER"’ 

15782 061056 000122 

15783 EVEN 

15784 

15785 061060 012706 001000 PWRUP: MOV MSTACK, SP RESET SP 

15786 061064 005037 177776 CLR a4P SW PRIORITY 0 == CLEAR CODES 

15787 061070 000137 001630 JMP aA START ZRESTART PROGRAM 








CQKDA=E KD11=k BASIC 
CQKDAE .P11 


— 
Ww 
@ 
D8 


12 


17=SEP= 


062716 
042766 
000006 


005237 
000002 
000000 


OGIC TESTS 
09:47 


000002 
000020 000002 


061116 


H 7 
MACY11 30A(1052) 17=SEP=79 09:55 PAGE 293 
POWER DOWN AND UP ROUTINES 


RARER ERAARAERAARAAARARARAERAARRERERARRARAARERERRRAKRKREEKAHEE KARE ERE 


-SBTTL "'T'' BIT SERVICE ROUTINE 


My SAAR RAARAAREAEAARRAAARAARERAAAEARARAHRAEREKRHEKHRKHREKEKRR ERE e 


TBSER: ADD #2, (SP) :MOVE RETURN PC AROUND ERROR CALL 
BIC #26,2(SP) STURN OFF THE ‘T'’ 
RTT “RETURN TO THE CALLING TEST 


.SBTTL MICROBREAK TRAP SERVICE ROUTINE 

LRAT EERE REE ER ER EERE RRR RRR EERE EERE ERR Ee 
THIS ROUTINE MERELY SETS A FLAG 

hee WHEN THE ROUTINE HAS BEEN ENTERED 


BKROUT: INC BKFLAG SET MICROBREAK FLAG TO 
INDICATE TRAP TO 4 OCCURRED 
RTI Z;RETURN FROM TRAP 
BKFLAG: .WwORD 0 7MICROBREAK TRAP FLAG 


: EERE EEE ERKERAREEEREEEE EKER 


-SBTTL RSVD INSTRUCTION TRAP SERVICE ROUTINE 


5 ROSS S22 SERRE EERE RR RRR RRR RRR RRR R ERR RRR RRR RRR RRR RRR RRR RRR RRR ERS SO | 


; THIS ROUTINE SERVICES UNEXPECTED RESERVED INSTRUCTION TRAP ERRORS 
317 RESULTS IN PRINTING THE ERROR MESSAGE: "TRAPPED TO 10 PC=XXXXXX"" 
WHERE XXXXXX IS THE ADDRESS CONTAINING THE INSTRUCTION WORD THAT 
;SPRUNG THE TRAP. AFTER PRINTING THE ERROR MESSAGE AN ATTEMPT IS 
:MADE TO RESTART THE PROGRAM AT THE BEGINNING. 


IF THE TRAP IS SPRUNG WHILE IN THE PROCESS OF TRYING TO SERVICE A 
PREVIOUS RSVD INSTRUCTION TRAP OR AN UNEXPECTED BUS ERROR THE PROGRAM 
sWILL HALT. AFTER THE HALT THE STACK WILL CONTAIN INFORMATION RELATIVE 
:TO THE TWO SUCCESSIVE TRAPS AS SHOWN BELOW: 


7 CSPJ PC+2 OF 2ND TRAP 
30SPJ]+2 PSw = 
Z0SPJ]+4 PC+2 OF 1ST TRAP 
;CSPJ+6 PSw ai 


LOCATION ‘‘CATERR’’ CAN BE EXAMINED TO OBTAIN THE FOLLOWING 
; INFORMATION: 


:CCATERR]=401 RSVD INSTR TRAP COMBINED WITH A BUS ERROR 
;TRAP (PC AT TIME OF ERROR HALT INDICATES 
WHICH OCCURRED FIRST) 

; CCATERRJ=2 TWO SUCCESSIVE BUS ERROR TRAPS 

;CCATERRJ=1000 TWO SUCCESSIVE RSVD INSTR TRAPS 


THE CONTENTS OF RO AT THE TIME OF THE 
SHALT PROVIDES FURTHER INFORMATION AS TO THE LAST TEST BEING EXECUTED 
;WHEN THE TRAPS OCCURRED. 


: THESE TWO INSTRUCTIONS ARE USED BY THE BASIC INSTRUCTION 
34 Sok a VERIFY THE RSVD INSTR TRAP MECHANISM PRIOR TO ACTIVATING THE SERVICE 


SEQ 0292 


ee 
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063252 RSVTST: COM RSVFLG ;SET RSVD INSTR TRAP TEST FLAG 
RTI ;RETURN TO BASIC TEST 


063256 RSERR: @ACATERR ANY PENDING CATASTROPHIC ERRORS 
BN INCRSV SBE IF YES 

063257 @41+CATERR ;SET RSVD_ INSTR FLAG 

010000 117672 #SW12,aSWR J ge + gel ERROR PRINT ? 


RESTAR ;BR YES 
;GO TYPE ‘’TRAPPED TO 10 PC="' 


(SP) ,-(SP) ;GET ERROR PC ON STACK FOR PRINTING 
; TYPE THE ERROR PC 
;OUTPUT CR / LF 


007012 @ASERTTL ; COUNT THE ERROR 
100000 117642 #B1T15,aSWR SHALT ON ERROR? 
RESTAR ;BR IF NOT 


I 
HALT ON 7 teeta CONTINUE 710 RESTART 
003266 RESTAR: a4 INIT :GO ATTEMPT RESTAR 
063257 INCRSV: @41+CATERR : INCREMENT RSVD INSTR FLAG 
A ; CATASTROPHIC ERROR HALT 
RESTAR ;DEPRESSING CONTINUE WILL CAUSE 
sATTEMPT TO RESTART. 


= od 
WM NMP 


anh ant cath and cl anil onl an aa anh anf cath ant all auld antl 
OD NNAAAMMMAAS & 


FRRKKKREKEKEKKKFEKFE KK 


ant auld 
<b od 
&M 


5 A220 020020202222 e eee EEEE RRR E REE RASA R EER ARERR ERR RRR ARSE RRR RRR ARRAS ES DE SD | 


.SBTTL BUS ERROR TRAP SERVICE ROUTINE 


SERRE ERE EEE EKER EERE KEE KERR EEE 


THIS ROUTINE SERVICES UNEXPECTED BUS ERROR TRAPS (BUS TIMEOUT, ODD ADDRESS 
ERRORS, STACK OVERFLOW, AND ILLEGAL INSTRUCTIONS). IT RESULTS IN PRINTING THE 
ERROR MESSAGE: "TRAPPED TO 4 PC =XXXXXX"' WHERE XXXXXX IS THE 

;CONTENTS OF THE PC WHEN THE TRAP WAS SPRUNG. AFTER PRINTING THE 

;ERROR MESSAGE AN ATTEMPT IS MADE TO RESTART THE PROGRAM AT 

; THE BEGINNING. 


IF THE TRAP IS SPRUNG WHILE IN THE PROCESS OF TRYING TO SERVICE A PREVIOUS 
:RSVD_ INSTR TRAP OR A PREVIOUS BUS ERROR, THE PROGRAM WILL HALT. 

sAFTER THE HALT THE STACK WILL CONTAIN INFORMATION RELATIVE TO THE 

:TWO SUCCESSIVE TRAPS AS SHOWN BELOW: 


7 CSPI PC+2 OF 2ND TRAP 
;CSP]+2 PSw a 
7CSP1+4 PC+2 OF 1S! TRAP 
7CSP]+6 PSwW he 


LOCATION ‘‘CATERR’’ CAN BE EXAMINED TO OBTAIN THE LOLL OWING 
; INFORMATION: 


;CCATERR]=401 RSVD a” TRAP COMBINED WITH A BUS ERROR 
TRAP (PC AT TIME OF ERROR HALT 
‘INDICATES WHICH OCCURRED FIRST) 
 CCATERRJ=2 TwO SUCCESSIVE BUS ERRORS 
;CCATERRJ=1000 TWO SUCCESSIVE RSVD INSTR TRAPS 


;THE CONTENTS OF RO AT THE TIME OF 
3 THE HALT PROVIDED FURTHER INFORMATION AS TO THE TEST IN PROGRESS 
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— 


nn 
me 


105237 
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000747 
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063256 


063256 
010000 


063256 


117512 
177000 
063246 


117574 


001112 


117520 


063246 
063246 


BETST: COM BERFLG 
RTI 


BERR: TST @ACATERR 
BN 2$ 
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BUS ERROR TRAP SERVICE ROUTINE 


;WHEN THE TRAPS OCCURRED. 


; THE CONTENTS OF THE SP CAN BE USED TO INDICATE IF STACK OVERFLOW CAUSED 
; THE BUSS ERROR TRAP(S) AS SHOWN BELOW: 


3400>CSPJ>336 YELLOW ZONE 

;CSPI=0 RED ZONE 
THESE TWO INSTRUCTIONS ARE USED BY THE BASIC INSTRUCTION TESTS TO 
: VERIFY THAT THE BUS ERROR TRAP MECHANISM WORKS PRIOR TO ACTIVATING 
; THE SERVICE ROUTINE 


;SET BUS ERROR TRAP TEST FLAG 
RETURN TO BASIC TEST 


ANY CATASTROPHIC ERRORS PENDING? 
;BR IF YES 


INCB = AACATERR SSET CATASTROPHIC ERROR FLAG 


BIT A#SW12,aSWR ; INHIBIT ERROR PRINT 
BivE RESTAR ;BR IF YES 
TYPE PRINT ‘TRAP TO 4'* MESSAGE 
BEMSG 
R RSBERT TYPE REST OF BUS ERROR MESSAGE 
2$: INCB @4CATERR :SET CATASTROPHIC ERROR FLAG 
HALT ; CATASTROPHIC ERROR HALT=-SCHOOLS OUT 
BR RESTAR ;DEPRESS CONTINUE TO ATTEMPT RESTART 


-SBTTL SCOPE HANDLER ROUTINE 


TRI II ISIOIIOIUIUIEISIIIIISIDIIOIOIOIIUIUIOIOIOIOIOIOIDIOIOIISIOIOIUIDIDIOIDIDIDINII IID 
;*THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
;*AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7: 0>) 
;*AND LOAD THE ERROR FLAG ($ERFLG) INTO Af oe ge tllba 08> 
see SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE 


SW14=1 LOOP ON TEST 
wits 1 INHIBIT ITERATIONS 
+ *SWO9=1 LOOP ON ERROR 
> *CALL 
3* SCOPE 3: SCOPE=I10T 
SSCOPE: 
CMP RO, a#STESTN ;ANY MISSED TESTS ? 
BEQ 10$ ‘BR IF NOT 
MOV #12$,a4SESCAPE :=NO ERROR LOOPING 
ERROR 11 ‘MISSED TESTS ERROR CALL 
12$: CLR QASESCAPE SNORMAL ERROR LOOPING 
10$: MOVB  RO,a4$TSTNM S INSURE TSTNUM IS CORRECT 
BIT #SW10,aSWR SLOOP ON SELECTED TEST? 
BEQ 11$ [BR IF NO 
MOY @SWR,@ASELTST GET CONTENTS OF SWITCHES 
BIC #177000, aM#SELTST :MASK OUT SWR<15:9> 
CMP RO, @#SELTST :1S THIS’ THE SELECTED TEST? 
BEQ SOVER ‘BR IF YES 


SEQ 0294 
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040000 


000004 
061402 
177060 
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11$: 
1$: BIT 


BNE 
 MABAASTART 
$XTSTR: BR 


5$: CMP 


6%: ;4A4ARAEND OF 
2$: TSTB 


7$: MOV 


BR 
4$: CLRB 


3$: BIT 


1$: MOV 


MO 
$SVLAD: INCB 
VB 


MO 
SOVER: MOV 
MO 


10$: oy 
SMXCNT: 200 
SCOPEA: Sy 
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SCOPE HANDLER ROUTINE 


SOVER 

OF CODE FOR THE XOR 
6$ 
@#ERRVEC ,-(SP) 
#5S$ , aMERRVEC 
a4177060 
(SP) +, @#ERRVEC 
$SVLAD 


(SP)+,@WERRVEC 
sL 
CODE FOR THE XOR’ TESTERAAAMA 


3$ 
SERMAX , SERFLG 


$LPERR,$LPADR 
SOVER 


SICNT 
$TIMES,$ICNT 
a Teas 
sniCn NSTIMES 
STSTNM,STESTN 


#1, SERMAX 
$TSTNM, DISPLAY ; 
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: ¢LOOP ON PRESENT TEST? 
sYES IF SwW14=1 
TESTERMMAAA 
sel RUNNING ON THE hy a TESTER CHANGE 
THIS INSTRUCTION TO “NOP’' (NOP=240) 
+: SAVE ue CONTENTS OF AME ERROR VECTOR 
ee T F TIMEOUT 
TIME ‘our ON XOR? 
; 7RESTORE THE ERROR atone 
:GO TO THE NEXT TEST 
:7CLEAR THE STACK AFTER A TIME OUT 
ZRESTORE THE ERROR VECTOR 
OOP ON THE PRESENT TEST 


oy a ERROR OCCURRED? 
::MAX. ERRORS FOR THIS TEST OCCURRED? 
:2BR IF NO 
;LOOP ON ERROR? 
;;BR_IF NO 
SISET LOOP ADDRESS TO LAST SCOPE 


+4 ZERO THE ERROR FLAG 
;:CLEAR THE NUMBER OF ITERATIONS TO MAKE 
SZESCAPE TO THE NEXT TEST 
: 2 INHIBIT ITERATIONS? 
:BR IF YES 


ii1F FIRST PASS OF PROGRAM 
INHIBIT ITERATIONS 

: INCREMENT ITERATION COUNT 
CHECK THE NUMBER OF ITERATIONS MADE 
:;BR IF MORE ITERATION REQUIRED 

{URE INITIALIZE THE ITERATION COUNTER 
:SET NUMBER OF ITERATIONS TO DO 

;: COUNT TEST NUMBERS 
SET TEST NUMBER IN APT MAILBOX 

> :SAVE SCOPE LOOP ADDRESS 

::SAVE ERROR LOOP ADDRESS 

sh ingg THE ESCAPE FROM ERROR ADDRESS 
ONLY ALLOW ONE(1) ERROR ON NEXT TEST 
; <DISPLAY TEST NUMBER 
FUDGE RETURN ADDRESS 

“WAS git INCREMENTED? 


;BR IF NO 
; INCREMENT TEST NUMBER 
FIX $TESTN TO BE WORD COUNT, NOT BYTE 


; MAX. NUMBER OF ITERATIONS 
THESE TWO INSTRUCTIONS ARE 


;USED IN THE BASIC TESTS TO 
VERIFY THE IOT LINKAGE 
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010546 


122737 
001007 


113737 
004737 
000 


013716 
012737 


00106C 
000004 


177777 


600001 


001014 
062742 


117044 


001000 


001010 
001112 


001112 
177777 


001140 
061764 


117032 


001074 
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-SBTTL ERROR HANDLER ROUTINE 
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ERROR HANDLER ROUTINE 


SPREE ERA AREER ERA EERE ERE EERE E REE EREAEERRKRR EE 


S*THIS ROUTINE WILL career THE ERROR FLAG AND THE ERROR COUNT, 


10$: 
7$: 


208: 


218: 
223: 
2s: 
3$: 
4$: 


5$: 


T ON 


R AND THE ADDRESS OF THE ERROR CALL 


L ROR 
INHIBIT ERROR TYPEOUTS 


LOOP ON ERROR 
N 7 ERROR=EMT AND N=ERROR ITEM NUMBER 
R5,-(SP) s SAVE R5 ON STACK 
#$REGAD ,R5 ;GET POINTER 
4(SP),(R5)+ ; SAVE ERROR PSW IN $REGAD FOR TYPOUT 
RO, (R5)+ ; SAVE RO FOR TYPEOUTS 
R1,(R5)+ : SAVE R1 IN $REG1 
R2,(R5)+ ;SAVE R2 IN $REG2, ETC. 
R3,(R5)+ 
R4,(R5)+ 
#-1,(R5) 30 = — STORED IN $REG5S? 
10$ ‘BR If YES 
SP, <«R5) :PUT SP IN $REGS FOR TYPOUT 
(SP)+,R5 sRESTORE RS 
SERFLG :5SET THE ERROR FLAG 
7$ ;DON'T LET THE FLAG GO TO ZERO 
$TSTNM,aDISPLAY : :DISPLAY TEST NUMBER AND ERROR FLAG 
SERTTL 3 INC THE ERROR COUNT 
(SP) , SERRPC T2GET ADDRESS OF ERROR INSTRUCTION 
#2, $ERRPC 
@SERRPC,$ITEMB sts AND SAVE THE ERROR ITEM CODE 
#B1T13,aSWR SKIP TYPEOUT IF SET 
20$ SKIP TYPEOUTS 
PC,SERRTYP =°60 TO USER ERROR ROUTINE 
AAPTENV, SENV 7 ZRUNNING IN APT MODE 
$ 7zNO,SKIP APT ERROR REPORT 
SITEMB,21$% ;7:SET ITEM NUMBER AS ERROR NUMBER 
Saanihin : REPORT FATAL ERROR TO APT 
0 
22$ ; APT ERROR LOOP 
aSWR :sHALT ON ERROR 
3$ SKIP IF CONTINUE 

+ SHALT ON ERROR! 
sot Ter ae ‘ie IF oe ee SWITCH SET? 
SLPERR, (SP) ;FUDGE RETURN FOR LOOPING 
$ESCAPE CHECK FOR AN ESCAPE ADDRESS 
5$ ;7BR IF NONE 
SESCAPE , (SP) 37FUDGE RETURN ADDRESS FOR ESCAPE 
#-1, a#$REGS :FLAG CURRENT STACK POINTER TO BE 


TYPED 


SEQ 0296 
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;CLEAR T BIT IN CASE ERROR OCCURED 
;IN T BIT TESTS 


CQKDA=E KD1i-K BASIC LOGIC TESTS 
CQKDAE .P11 17-SEP-79 09:47 


062034 042766 000020 000002 BIC #20,2(SP) 
062042 000002 RTI 


062044 005137 063244 ERRA: COM @4ERRFLG THESE TWO INSTRUCTIONS ARE USED . 
062050 000002 RTI IN THE BASIC TESTS TO VERIFY THE EMT 


-SBTTL ERROR MESSAGE TYPEOUT ROUTINE 


DDO IOI UII IO OUI IOIIDIISI IO IUISIISIUUIDIUIDISIUISIIIOUIOIIUIIOIINIUIDIOUIIUIIDIIOI II itt 
;*THIS ROUTINE USES THE ‘'ITEM CONTROL BYTE'’ ($ITEMB) TO DETERMINE WHICH 
;*ERROR IS TO BE REPORTED. IT THEN OBTAINS, FROM THE “ERROR TABLE’’ ($ERRTB), 
;*AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 


SERRTYP: 
001715 TYPE ,SCRLF 
RO,-(SP) 
RO 


001014 I ovS1TEMB.RO 


; :ISAVE. AO RETURN'' & "LINE FEED" 
::PICKUP THE ITEM INDEX 


:31F ITEM NUMBER IS ZERO, JUST 

:. TYPE THE PC OF THE ERROR 

001016 SERRPC ,-(SP) a SERRPC FOR TYPEOUT 

ERROR ADDRESS 

£260, TYPE=-OCTAL ASCII(ALL DIGITS) 


; GE 
: :ADJUST THE INDEX SO THAT IT WILL 
3 WORK FOR THE ERROR TABLE 


RO 

001150 #$ERRTB,RO 2s FORM TABLE POINTER 

062124 (RO) +,2$ :PICKUP ‘ERROR MESSAGE"’ POINTER 
3$ :: SKIP TYPEOUT IF NO POINTER 


: ‘ 0 
001115 -SCRLF ; 
062142 : MOV (RO)+,4$ ::PICKUP ‘DATA HEADER'’ POINTER 
5$ :SKIP TYPEOUT IF 0 
TYPE THE ‘DATA HEADER’’ 
33° DATA HEADER’ POINTER GOES HERE 
72\‘CARRIAGE RETURN’ & “LINE FEED"’ 


3 . 0 
001115 -SCRLF 


MONON — 2 PS PM SS 


001115 


(RO) ,RO 
7$ 


(SP) +,RO 
-$CRLF 
PC 


@(RO)+,-(SP) 
(RO) 
$ 


;zPICKUP ‘DATA TABLE*’ POINTER 
3:GO TYPE THE DATA 


ia $b yy 3 RO 
;;' ‘CARRIAGE RETURN’ & ‘LINE FEED"’ 
TURN 


2s SAVE a(RO)+ FOR TYPEOUT 

37GO TYPE--OCTAL ASCII(ALL DIGITS) 
71S THERE ANOTHER NUMBER? 
“CBR OIF NO 

* TYPE TWO(2) SPACES 


sel 
32 TWO(2) SPACES 


2 RRR RRR RRR RRR ERR RR RRR RR RRR SER RRR RRR RRR RR RRR RRR RRR RR RRR REE Se 
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CQKDA=E KD11-K wit LOGIC TE 
CQKDAE .P11 17=SEP=79 09:47 PRINT ROUTINE SEQ 0298 
16124 .SBTTL PRINT ROUTINES 

16125 PERERA REE RE ERE EERE RRR ee 
16126 : 

16127 062206 005137 063242 PRINA: COM @A4PRIFLG ; THESE TWO INSTRUCTIONS ARE 

16128 062212 000002 RTI ;USED BY THE BASIC TESTS TO VERIFY 

+ af 4 ; THE TRAP INSTRUCTION 

at -SBTTL TYPE ROUTINE 

16133 8 Re eRe ee ee REE EERERERRREEE 
16134 + *ROUT INE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A 0 Fee 
16135 >*THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE F 
16736 + *NOT El: SNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLERS OMARACTER. 
16137 ;*NOTE2: SPILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
bof 7 *NOTES: $FILLC CONTAINS THE CHARACTER TO FILL AFTER. 

** 

16140 *CALL: 

16141 1) — A TRAP INSTRUCTION 

16142 j ; TYPE ~MESADR ;zMESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
16143 “£0R 

16144 aa TYPE 

16145 :* ME SADR 

16146 ;* 

16147 

16148 062214 105737 001057 $TYPE: TSTB STPFLG 3313 on “. TERMINAL ? 

16149 062220 100002 BPL 1$ ;7BR IF 

16150 062222 000000 HAL T 3 HALT HERE IF NO TERMINAL 

16151 062224 000430 BR 3$ : sLEAVE 

16152 062226 010046 1$: MOV RO,-(SP) SAVE RO 

16153 062230 017600 000002 MOV a2(SP) ,RO £3681 ADDRESS OF ASCIZ STRING 

16154 062234 122737 000001 001140 CMPB HAPTENV, SENV RUNNING IN APT MODE 

16155 062242 001011 BNE 62$ > INO, GO CHECK FOR APT CONSOLE 

16156 062244 132737 000100 001141 BITB #APTSPOOL .SENVM : ;SPOOL MESSAGE TO APT 

16157 062252 001405 BEQ 62$ ZINO, GO CHECK FOR CONSOLE 

16158 062254 010037 062264 MOV RO,61$ 7; SETUP MESSAGE ADDRESS FOR APT 

16159 062260 004737 062732 JSR PC, $ATY3 es OOL MESSAGE TO APT 

16160 062264 000000 61$: «WORD 0O 7 zMESSAGE ADDRESS 

16161 062266 132737 000040 001141 62$: BITB MAPTCSUP ,SENVM + APT CONSOLE SUPPRESSED 

16162 062274 001003 BNE 60$ iYES, SKIP TYPE OUT 

16163 062276 112046 es: MOVB (RO)+,-(SP) PUSH CHARACTER TO BE TYPED ONTO STACK 
16164 062300 001005 BNE 4$ :2BR IF IT ISN*T THE TERMINATOR 
16165 062302 005726 TST (SP) + ;1F TERMINATOR POP IT OFF THE STACK 
16166 062304 012600 60$: MOV (SP)+,RO : :RESTOR E RO 

16167 062306 062716 000002 3$: ADD #2, (SP) ; ;ADJUST RETURN PC 

16168 062312 000002 RTI +S RETURN 

16169 062314 122716 000011 4$: CMPB MHT, (SP) 7 BRANCH IF <HT> 

16170 062320 001430 BEQ 

16171 062322 122716. 000200 CMPB ACRLF , (SP) 7 BRANCH IF NOT <CRLF> 

16172 062326 001006 BNE 5$ 

16173 062330 005726 : TST (SP) + 7zPOP <CR><LF> EQUIV 

16174 062332 104401 TYPE 37 TYPE A CR AND LF 

16175 062334 001115 SCRLF 

16176 062336 105037 062472 CLRB $SCHARCNT ;zCLEAR CHARACTER COUNT 

16177 062342 000755 BR 2$ 7;GET NEXT CHARACTER 

16178 062344 004737 062426 5$: JSR PC, $TYPEC oh TYPE THIS CHARACTER 


16179 062350 123726 001056 6$: CMPB SFILLC,(SP)+ 71S IT TIME FOR FILLER CHARS.? 
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001350 
013746 


STS 


001054 
000001 


062426 
062472 


000040 
062426 
000007 062472 


116416 


116677 000002 
000015 


062472 
000012 


116410 
000002 


000002 


MACY11 30A(1052) 


TYPE ROUTINE 


7$: DECB 


;HORIZONTAL TAB 


8s: MOVB 
o$: JSR 


STYPEC: 


1$: CMPB 
INCB 


SCHARCNT : . WORD 


STYPEX: RTS 


B 8 
17-SEP-79 09: 


2s 
SNULL . = (SP? 
1(SP) 

6$ 


PC ,S$TYPEC 
SCHARCNT 
7$ 


PROCESSOR 


#’ (SP) 
PC, S$TYPEC 
#7, $CHARCNT 
9$ 


(SP) + 
$ 


2 

a$TPS 
STYPEC 
2(SP) ,a$TPB 
* petals 


$SCHARCNT 
$TYPEX 
ALF ,2(SP) 
$TYPEX 
(PC)+ 

0 

PC 


55 PAGE 300 
SEQ 0299 


:21F NO GO GET NEXT C 
GET # OF FILLER CHARS. “NEEDED 
oe THE NULL CHAR 
: DOES A NULL NEED TO BE TYPED? 

BR IF NO--GO POP THE NULL OFF OF STACK 
7:G0 TYPE A NULL 
fig a COUNT AS A COUNT 


oe 


i TAB WITH SPACE 
TYPE A SPACE 

; ;BRANCH IF NOT AT 

23 TAB STOP 
:PQP SPACE OFF STACK 

S:GET NEXT CHARACTER 

;sWAIT UNTIL PRINTER IS READY 


;;LOAD CHAR TO BE TYPED INiO DATA REG. 
31S or a te A CARRIAGE RETURN? 


CH IF NO 
i: YES--CLEAR CHARACTER COUNT 


5 EXIT 

i248 CHARACTER A LINE FEED? 
eg IF YES 
COUNT THE CHARACTER 
s CHARACTER COUNT STORAGE 


-SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


SUIS IOISIIOIIOIUIUIOISISIIIIOISIOIIOIUIOIIUIOIUISIOIIIIOIIDIOIUUIIDIIOIOIOIDIOE ODI t 
“THIS ROUTINE IS USED TO CHANGE A 16-B8I1T BINARY NUMBER TO A 6-DIGIT 
;*OCTAL (ASCII) NUMBER AND TYPE IT 
:*$TYPOS==-ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


3*CALL: 

3* MOV 
i* TYPOS 
;* -BYTE 
;* -BYTE 
;* 

ae 

** 


NUM, -(SP) 


N 
M 


> NUMBER TO BE TYPED 
7zCALL FOR TYPEOUT 
7zN=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
;;M=1 OR 0 
321=TYPE LEADING ZEROS 
7 0=SUPPRESS LEADING ZEROS 


:*$TYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
;*$TYPOS OR $TYPOC 


;*CALL: 


S 


NUM, = (SP) 


;NUMBER TO BE TYPED 
SICAL FOR TYPEOQUT 


-t 
;*$TYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 


7 *CALL 
i* 


MOV 
s* TYPOC 


NUM ,~ (SP) 


7 NUMBER TO BE TYPED 
32CALL FOR TYPEOUT 


CQKDA-E KD11-K BASIC L 
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062722 
177770 


000002 00004 


MACY11 30A(1052) 
BI 


$TYPOS: 


$TYPOC: 
$TYPON: 


1$: 
2s: 


3$: 


4$: 
5$: 


7$: 


6$: 


8$: 


SOCNT: . 
SOFILL: . 
SOMODE: . 


C 8 
17=SEP=79 09:55 PAGE 301 
NARY TO OCTAL (ASCII) AND TYPE 


a(SP) ,-(SP) 


1(SP) ,$OF ILL 
(SP) +, SOMODE +1 


#2, (SP) 
$TY 


R4 , SOMODE 
SOFILL.R4 
12(SP) ,R5 


(SP) +,R3 
2 (SP) ,4(SP) 


SEQ 0300 


33PICKUP THE MODE 

: LOAD ZERO FILL SWITCH 
NUMBER OF DIGITS TO TYPE 

T:ADJUST RETURN ADDRESS 


aa 3 THE ZERO a i hee 
sSET FOR SIX(6) DIG 
;SET THE ITERATION COUNT 

+ SAVE R3 

2 SAVE RG 
SAVE R5 

+:GET THE NUMBER OF DIGITS TO TYPE 


;; SUBTRACT IT FOR MAX. ALLOWED 
;zSAVE_IT FOR USE 
3:GET THE ZERO FILL SWITCH 
;sPICKUP THE INPUT NUMBER 
Attar THE OUTPUT WORD 

ROT notg — INTO ‘'C’’ 


; OM 
FORM THIS DIGIT 


:GET LSB OF THIS DIGIT 
TYPE THIS DIGIT? 


IF NO 
2:GET RID . JUNK 


ne I S 
::DON'T SUPPRESS ANYMORE 00'S 
3zMAKE THIS DIGIT ASCII 
: /MAKE ASCII IF NOT ALREADY 
7: SAVE FOR TYPING 
+260 TYPE THIS DIGIT 

OUNT BY 1 


2 ¢BR IF MORE TO DO 


BR _IF DONE 
: INSURE LAST ty ISN'T A BLANK 
:GO DO a DIGIT 


: R3 
SISET THE STACK FOR RETURNING 


7 RETURN 

sz; STORAGE FOR ASCII DIGIT 

7, TERMINATOR FOR TYPE ROUTINE 
7Z0CTAL DIGIT COUNTER 

3 7ZERO FILL SWITCH 

> NUMBER OF DIGITS TO TYPE 


-SBTTL APT COMMUNICATIONS ROUTINE 


CG AAAAAAAAAAERAEAAAERRERAAERERAARAERERARAERAAERERRAEREKEAA KEKE AREER ED 
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063170 
063166 


063170 


001140 
001141 


000004 


001120 


063100 
000004 


001122 
000004 


D 8 
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APT COMMUNICATIONS ROUTINE 


SATY1: MOVB #1,$FFLG 
SATY3: MOVB #1, SMFLG 

BR SATYC 
$ATY4: MOVB #1,$FFLG 
$ATYC: 


MOV RO,=(SP) 

MOV R1,-(SP) 

TSTB a 

CMPB MAPTENV, SENV 
BNE $ 

BITB RAPTSPOOL .SENVM 5: 


MOV a4 (SP) ,RO 
ADD #2,4(SP) 


1$ TST SMSGTYPE 
BNE 1$ 
MOV RO, $MSGAD 
2s: TSTB (RO) + 
BNE 2$ 
SUB $MSGAD ,RO 
ASR RO 


MOV RO, $MSGLGT 
MOV “os 


BR 
3$ MOV a4 (SP) ,4$ 
ADD #2,4(SP) 
MOV 177776, -(SP) 
JSR PC, $TYPE 
4$: .WORD 0 
5$: 
10$: STB ~—s- SFFLG 
BEQ 12$ 
TST SENV 
BEQ 12$ 
11$ TST $MSGTYPE 
BNE 11$ 


MOV @4 (SP) ,SFATAL 
ADD #2,4(SP) 


12$: CLRB SFFLG 


CLRB $LFLG 

CLRB SMF LG 

MOV (SP)+,R1 

MOV (SP) +,RO 

RTS PC 
$MFLG: .BYTE 


0 

$LFLG: .BYTE Q 

$FFLG: .BYTE 0 
EVE 


APTSPOOL=100 
APTCSUP=040 


-SBTTL TRAP DECODER 
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3370 REPORT FATAL ERROR 
3:TO TYPE A MESSAGE 


:2TO ONLY REPORT FATAL ERROR 


; PUSH RO ON STACK 
PUSH R1 ON STACK 
: s SHOULD TYPE A MESSAGE ? 
NOT: BR 


3if 

:ZOPERAT ING UNDER APT? 
;iF NOT: BR 
SHOULD _SPOOL ME SSAGE S? 
F NOT: BR 


SIGET MESSAGE ADDR. 
; ;BUMP RETURN ADDR. 
2 SEE B F DONE u/ LAST XMISSION? 


>:PUT NADBR IN MAILBOX 
::FIND END OF MESSAGE 


;;SUB START OF MESSAGE 
3:GET MESSAGE LNGTH IN WORDS 
7zPUT LENGTH IN MAILBOX 
;: TELL APT TO TAKE MSG. 


:zPUT MSG ADDR IN JSR LINKAGE 
-BUMP RETURN ADDRESS 
; ;PUSH 199776 ON STACK 
[CALL TYPE MACRO 


; SHOULD REPORT FATAL ERROR? 
siF NOT: BR 
age UNDER APT? 


;1F NO BR 
:F INISHED LAST MESSAGE? 
NOT: WAIT 


sei 
GET ERROR # 

;BUMP RETURN ADDR. 
= Teck APT TO TAKE ERROR 
CLEAR FATAL FLAG 

“CLEAR LOG FLAG 
3:CLEAR MESSAGE FLAG 
:zPOP STACK INTO R1 
— STACK INTO RO 


S FATAL FLAG 


SEQ 0301 


PE ET A I Sag ig ge ke 


E 8 
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16348 

16349 PLE RRR EERE RARER ERRATA REE RRR 

16350 *THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE ‘‘TRAP’' INSTRUCTION 

16351 :*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 

16352 >*OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 

1oe0? :*GO TO THAT ROUTINE. 

16355 063172 010046 $TRAP: MOV RO,-(SP) ; SAVE RO 

16356 063174 016600 000002 MOV 2(SP) ,RO ZIGET TRAP AgpreSS 

16357 063200 005740 TST -(RO) CKUP BY 

16358 063202 111000 MOVB (RO) ,RO :3GET RIGHT BYTE OF TRAP 

16359 063204 006300 A ASL RO POSITION FOR INDEXING 

16360 063206 016000 063226 MOV $TRPAD (RO) ,RO +: INDEX TO TABLE 

16361 063212 00200 RTS RO 3:GO TO ROUTINE 

16362 

16363 

16364 3zTHIS IS USE TO HANDLE THE ‘'GETPRI'' MACRO 

16366 063214 011646 $TRAP2: MOV (SP) ,=(SP) >zMOVE THE PC DOWN 

16367 063216 016666 000004 000002 MOV 4(SP),2(SP) >zMOVE THE PSW DOWN 

lense 063224 000002 RTI 7 RESTORE THE PSW 

‘oe .SBTTL TRAP TABLE 

1637. >*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 

16373 :*BY THE ‘‘TRAP’' INSTRUCTION. 

16374 

16375 : ROUTINE 

16376 5 ee 

16377 063226 063214 $TRPAD: .WORD $TRAP 

16378 063230 062214 $TYPE ;;CALL=TYPE TRAP+1(104401) TTY TYPEOUT ROUTINE 

16379 063232 062522 $TYPOC ;;CALL=TYPOC TRAP+2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
16380 063234 062476 $TYPOS ;;CALL=TYPOS TRAP+3(104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
+t 4 063236 062536 $TYPON ;;CALL=TYPON TRAP+4(104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 
16383 

16384 

a> +4 FLAGS, CONSTANTS, AND VARIABLES 

16387 063240 000000 BPTLOC: 0 STORES 16 USER DEFINED MAINTENANCE 

16388 * BREAKPOINTS 

16389 063242 000000 PRIFLG: 0 :;FLAG USED BY BASIC TESTS FOR TRAP TEST 
16390 063244 000000 ERRFLG: 0 [FLAG USED BY BASIC TESTS FOR EMT TEST 

16391 063246 000000 SELTST: 0 STORES SR<8:0> FOR LOOP ON SELECTED TEST 
16392 063250 000000 SCOFLG: O ;USED BY BASIC TESTS FOR IOT TEST 

16393 063252 000000 RSVFLG: 0 zFLAG USED BY BASIC TEST OF RSVD INSTR TRAP 
16394 063254 000000 BERFLG: 0 FLAG USED BY BASIC TEST OF BUS ERROR TRAPS 
16395 063256 000000 CATERR: 0 FLAGS USED BY BUS ERROR AND RSVD INSTR TRAP 
16396 SERVICE ROUTINES 

16397 063260 000000 ONCE: O S PROGRAM TITLE HAS BEEN PRINTED 

pgs ; COMMON DATA STRUCTURES AND MISCELLANEOUS TABLES 

16400 063262 177400 OBUF: 177400 :DL11 OUTPUT TEST BUFFER 

16401 063264 177400 177400 

16402 177400 177400 


063266 
16403 063270 177400 177400 
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16404 
16405 
16406 
16407 
16408 


EERRREREE 
NOUS WIN HO 


me 
| whe 
i 


17*$ 


000377 
125252 


000000 
177777 


MACY11 oo 


TRAP TAB 

IBUF : -BLKW 

ATA: DwTA 
DwWTB 
DBTA 
DBTB 
MBUF 0 
MBUF 1 

MBUF 0: 

MBUFi: 0 
0 

DWTA: :, 
177400 
377 


125252 
ALUADD: 052525 


000000 


25252 


ANDTAB: 000000 


F 8 
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3DL11 INPUT TEST BUFFER 


sALSO SERVES AS NULL ENTRY FOR ALUADD 


;THIS TABLE OF 8 ENTRIES IS USED BY THE ALU ADD TEST IN THE 
; COMBINED INSTRUCTION TESTS 


:SRC OP1 
:DST OP1 


:SRC OP2 
DST OP2 


; 8 
ZANS8 -= ALSO NULL ENTRY FOR ANDTAB 
THIS TABLE OF 8 ENTRIES IS USED BY THE ALU ‘‘AND’’ TESTS IN THE 


COMBINED INSTRUCTION EXERCISER TESTS 


000000 


177777 


;SRC_OP1 
:DEST OP 1 


7 ANS1 
;SRC OP2 


SEQ 0303 
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177777 


000000 
177777 
177777 
177777 


000000 
125252 
125252 


MACY11? 30A(1052) 
TRAP TABLE 


177777 


125252 


G 
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SEQ 0304 


H 8 lead 
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CORDAWE KD11=K BASIC LOGIC 7 
Pll: 17=SEP=79 09:4 TRAP TABLE SEQ 0305 
000000 ZANS5 
052525 052525 SRC OP6 
052525 052505 :DST OP6 
000000 ZANS6 
125252 125252 [SRC OP7 
052525 52525 DST _OP7 
052525 052525 ? 
052525 052525 SRC OP8 
125252 125252 DST OP8 
125252 ORTAB: 125252 ZANS8 == ALSO NULL ENTRY FOR ORTAB 
:THIS TABLE OF 8 ENTRIES IS USED BY THE ALU ‘OR’’ TEST IN THE 
COMBINED INSTRUCTION EXERCISER TEST 
000000 000000 SRC OP1 
000000 000000 :DEST OP1 
000000 000000 ANS 1 
177777 177777 SRC OP2 
177777 177777 :DST_OP2 
177777 177777 ANS2 
000000 000000 SRC OP3 
177777 177777 =DST_OP3 
177777 | 177777 ZANS3 
177777 177777 SRC OP4 
000000 SDST OP4 
177777 177777 
125252 125252 SRC OPS 
125252 125252 DST _OP5 
125252 125252 {ANS 
052525 052525 SRC OP6 
52525 052525 DST OP6 
052525 052525 ANS6 
125252 125252 SRC OP7 
052525 052525 DST_OP7 
177777 177777 {ANS7 
052525 052525 | SRC OP8 
125252 125252 DST OP8 
177777 ALUSUB: 177777 TANS8 -= ALSO NULL ENTRY FOR ALUSUB 
;THIS TABLE OF 8 ENTRIES IS USED BYTHE ALU SUB TEST iN THE 
[COMBINED INSTRUCTION EXERCISER TESTS 
000000 000000 SRC OP1 
000000 000000 DST OP1 
000000 900000 ZANS1 
177777 177777 SRC OP2 
177777 177777 :DST_OP2 
000000 000000 ANS2 
125252 125252 SRC OP3 
052525 052525 :DST _OP3 
125253 125253 ANS3 
052525 052525 SRC OP4 
125252 125252 :DST OP4 
052525 052525 ANS4 
125252 125252 SRC OPS 
125252 125252 :DST OPS 
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TRAP } 


INSTAB: 


R2 ; 
R2 ; 


(R2) 
(R3),(R2) 
(R3),(R2) 
(R3),(R2) 
(R3),(R2) 
(R3) ,R2 
Re 


R3,R2 


SANS 
;SRC OP6 
:DST OP6 


7; ANS6 
:SRC OP7 
:DST OP7 
;ANS7 
7SRC OP8 
:DST OP8 
; ANS8 
BEGINNING OF INSTRUCTION TABLE OF INSTRUCTIONS 
THAT TEST BUT SERVICE IN VARIOUS ROM LOCAT!ONS 
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53 
MED TEST TABLES 


BGO s Coe 


;ALSO SERVES AS INSTAB TABLE TERMINATOR 


FOLLOWING IS A TABLE OF INTERNAL REGISTER OPERATION CODES 


USED FOR TESTING THE MED INSTRUCTION. 


LS CORRESPOND 


LABE 
TO REGISTER NAMES, THE HIGH BYTE IS THE READ OPERATION 
CODE, THE LOW BYTE THE WRITE CODE. 


TRAP TABLE 
ADD 
MOV 
MOV 
MOVB 
ROL 
ROLB 
NE GB 
BVS 
BVC 
RESET 
CMP 
BIT 
BIC 
CMPB 
BITR 
BICB 
BISB 

DwIB: 9 

0 

177401 
52526 
1252 

** 

TLOC1 . WORD 

PSWHOL: .WORD 

TABBEG: .WORD 

TABEND: .WORD 

STGBLK: .BLKW 

VADR: . WORD 

PA1716: .WORD 

PA1500: .WORD 

TLOC2 . WORD 

;* 

3* TABLE I] 

7* 

3* 

28 

te 

3% 

:@ 

7* 

te 

TBL2 

ASP1 

RIA: BYTE 

R2A: BYTE 

R3A: BYTE 

RGA: BYTE 


NOTE: 


WHEN ADDING OR DELETING 


ENTRIES IN THIS TABLE, CHECK DUA 
ADDRESING TEST TO SEE THAT THE ‘SCRATCH 
PAD LIMITS** ARE MAINTAINED. 


201,001 


204,004 


3A SCRATCH PAD = LO 
SLOBYTE, HIBYTE=WRITE CODE, READ CODE 


SEQ 0307 
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CQKDAE .P11 17=SEP=79 09:47 TRAP TABLE SEQ 0508 
1 064202 205 005 RSA: BYTE 205,005 
16639 064204 206 006 R6A: BYTE 206,006 
16640 064206 210 010 FAC3.0: .BYTE 210,010 
16641 064210 211 011 FAC3.1: .BYTE 211,011 
16642 064212 el2 Ole FAC3.2: .BYTE 212,012 
16643 064214 213 013 FAC3.3: .BYTE 213.013 
16644 064216 214 014 FAC3.4: .BYTE 214,014 
16645 064220 215 015 FAC3.5: .BYTE 215,015 
16646 064222 216 016 ; BYTE 216,016 
16647 064224 217 017 FDST3: .BYTE 217,017 
16648 064226 220 020 WCSA.0: .BYTE 220,020 ZA SCRATCH PAD=HI 
9 064230 221 021 WCSA.1: .BYTE 221,021 
16650 064232 222 022 BYTE 222,022 
16651 234 3 023 CNSTSW: .BYTE 223,023 
16652 236 26 02 CNSSW BYTE 226,026 
16653 064240 227 027 CNSCDR: .BYTE 227,027 
16654 064242 230 030 FAC1.0: .BYTE 230,030 
16655 064244 231 031 FAC1.1: .BYTE 231,031 
16656 064246 232 032 FAC1.2: .BYTE 232,032 
16657 064250 233 033 FACi.5: .BYTE 233,033 
16658 064252 234 034 FAC1.4: .BYTE 234, 
16659 064254 235 035 FAC1.5: .BYTE 235,035 
1 064256 236 036 FPSHI: .BYTE 236,036 
ieae> 064260 237 037 ASP2: FDST1: .BYTE 237,037 
16663 064262 BSP1 
16664 064262 241 041 R1B: BYTE 241,041 3B SCRATCH PAD = LO 


16671 064300 251 051 FAC2 BYTE 251,051 

16672 06430 252 052 FAC2.2: .BYTE 252,052 

16673 064304 253 053 FAC2.3: .BYTE is 

16674 064306 254 054 FAC2.4: .BYTE 254,054 

16675 064310 255 055 FAC2.5: .BYTE 55, 

16676 064312 256 056 68 BYTE . 

16677 064314 

16678 064316 260 060 WCSB.0: .BYTE 260,060 3B SCRATCH PAD = HI 

16679 064320 261 061 WCSB.1: .BYTE 261,061 

16680 064322 262 062 WCSADR: .BYTE 262,062 

16681 064324 263 063 RZERO: .BYTE 263,063 

16682 064326 RVECT: .BYTE 66, 

16683 064330 270 070 FACO.0: .BYTE 270,070 

16684 : 064332 272 072 FACO.1: .BYTE 272,072 

16685 064334 273 073 FACO.2: .BYTE 273,073 

16686 064336 274 074 FACO.4: .BYTE 274,074 

16687 064340 275 075 FACO.5: .BYT 275,075 

16688 064342 276 076 FEA: BYTE 276,076 

srr 44 064 344 277 077 BSP2: FDSTO: .BYTE 277,077 

16691 064346 CSP1: 

16692 064346 300 100 LJAM:  .BYTE 300,100 3C SCRATCH PAD 
064350 301 101 LSERV: .BYTE 301,101 
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wn 
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wn 


oO RS SS 
Rosa =4=aoSoSoS Nm 
SNE AWN HONE WP 


RRC 
wm 


TRAP TABLE SEQ 0309 
BYTE 302,102 
BYTE 303,103 
-BYTE 304,104 
-BYTE 305,105 
BYTE 307,107 
-BYTE 310,110 
-BYTE 311,111 
BYTE 312,112 
BYTE 313,113 
CNSTO: .BYTE 316,116 
.BYTE 224.024 
-BYTE 225,025 
-BYTE 264,06 
-BYTE 265,065 
«WORD 0 
TABLE II] 


THE FOLLOWING IS A LIST OF *NOP** OPERATION CODES 
THAT WILL BE USED WITH A MED IN MED TEST 3 TO 
ENSURE THAT A MED WITH THESE CODES WILL NOT HANG. 


-BYTE 120,137 GROUP A 

«BYTE 145,145 GROUP B 

-BYTE 150,151 GROUP C 

-BYTE 156,177 ;GROUP D 

BYTE 320,343 ;GROUP E 

BYTE 353,357 ;FROUP G 

-WORD 0 3A 0 TERMINATES TABLE 
TABLE IV 


THE LIST BELOW CONTAINS THOSE OPERATION CODES 
CORRESPONDING TO THE INTERNAL REGISTERS WHICH MUST 
BE TESTED SEPERATELY BECAUSE THEY ARE READ-ONLY, 
WRITE-ONLY, OR USED IN MACRO CODE EXECUTION, ETC. . . 


-BYTE 200,000 ;LOBYTE ,HYBYTE - WRITE CODE, READ CODE 
-~BYTE 207,007 :0 REPLACES ANY NON EXSISTENT CODES 
-BYTE 240,040 EXCEPT IN THE CASE OF ROA 

BYTE 47,047 


ABLE V 
.BYTE 306 : THIS TABLE CONTAINS THE OPERATION — 
“BYTE 106 “CODES OF THOSE INTERNAL REGISTERS 
"BYTE 315 ‘WHICH MUST BE TESTED USING THE 
BYTE 115 “MICROBREAK REGISTER. T 


. HEIR 
: .BYTE 267 ASSOCIATED MICRO-ADDRESSES ARE IN 





CQKDA-E KD11=-K BASIC LOG 
CQKDAE .P11 17-SEP-79 
16750 064447 067 
16751 064450 140 
16752 064451 141 
16753 064452 142 
16754 064453 143 
16755 064454 S44 
16756 064455 144 
16757 064456 345 
16758 064457 146 
16759 064460 346 
16760 064461 147 
16761 064462 347 
16762 064463 351 
16763 0644 152 
16764 064465 352 
16765 064466 153 
16766 064467 000 

16767 

16768 

16769 

16770 

16771 064470 

16772 

16773 064470 003330 
16774 064472 003150 
16775 064474 003375 
16776 064476 003271 
16777 064500 003240 
16778 064502 003224 
16779 064504 003160 
16780 064506 003161 
16781 064510 003170 
16782 064512 003171 
16783 064514 003344 
16784 064516 003320 
16785 064520 334 

16786 064522 334 

16787 064524 003350 
16788 964526 003341 
16789 064530 003351 
16790 064532 003355 
16791 064534 003720 
16792 064536 003724 
16793 064540 003721 
16794 

16795 

16796 

16797 

16798 

16799 064542 

16800 

16801 064542 000100 
16802 064546 000101 
16803 064552 000102 
16804 064556 000103 
16805 064562 000104 


Ic TE 
09:47 


TESTS 


077600 
000010 
020000 
000004 


05 


0000 


MACY11 30A(1052) 


mM 8 
17=SEP=79 09:55 PAGE 311 


TRAP TABLE 
-BYTE 067 ; THE NEXT TABLE 
JAM: BYTE 140 
SERV: -BYTE 141 
: BYTE 142 
CUA BYTE 143 
FLAG BYTE 344 
-BYTE 144 
DREG: BYTE 345 
REV: BYTE 146 
SREG: BYTE 346 
C T: BYTE 147 
NUA: BYTE 347 
RES: -BYTE 351 
DCSO: BYTE 152 
-BYTE 352 zs INIT REG 
DCS1 BYTE 153 
-BYTE 0 ; TABLE TERMINATOR 
EVEN 
* TABLE VI 
TBL6: 
ULCDTA: .WORD 3330 ;THIS TABLE CONTAINS THE MICRO-ADDRESSES 
-WORD 3150 ;WHICH ARE LOADED INTO THE MICROBREAK 
UMD : -WORD 3375 ;REG. TO TEST THE OPERATION CODES 
-WORD 3271 ; CONTAINED IN THE PRECEEDING TABLE. 
UCNSCTL:.WORD 3240 
-WORD 3224 
UJAM: -WORD 3160 
USERV: .WORD 3161 
UPBA: -WORD 3170 
UCUA: -WORD 3171 
UFLAG: .WORD 3344 
-WORD 3320 
UDREG: .WORD 3345 
UREV: -WORD 3340 
USREG: .WORD 3350 
UCOUNT: .WORD 3341 
: -WORD 3351 
URES: -WORD 3355 
UDCSO: .WORD 3720 
UINIT: . WORD 3724 
UDCS1 -WORD 3721 
;* TABLE VII 
** 
i* THIS TABLE HOLDS THE OPERATION CODES AND THE CONSTANT 
he ? VALUE EXPECTED FOR CERTAIN INTERNAL REGISTERS. 
L . 
CLUAM: WORD 100,77600 
CLSERV: .WORD 101,1 
PBA: 102,20000 
CLCUA: .WORD 103,4 
CLFGIN: .WORD 104 ,50000 


SEQ 0310 


16806 
16807 
16808 


é 


od aad aed ed cn ea eae ed cd 
PERRELERRE 
OONAUNESWN—O 


16823 


SSSSeeses 4h 
NERWV=SLA 


001 


020102 
020123 
051505 


000 
042412 
051501 


252 


120 


051504 
051504 


024527 
051440 


051520 
051511 
020123 


042116 
020123 


pnt AS aa 052) 


TRAP T 


EM10: 


EM3: 


N 8 . 
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SEQ 0311 
«WORD = 105,54000 
«WORD 107,24000 
. WOR 110,177400 
-WORD 111,177600 
«WORD 112,100000 
:.WORD 113,200 
«WORD 114,2 
-WORD 116,0 
«WORD 117,1 
-WORD 0 
000,377,252,125 


000,001,120,253 


ASCII 
-ASCII 


ASCII 
eASCIZ 


eASC1Z 


eASCIZ 


eASCI1Z 
-ASCIZ 
eASCIZ 


*S/B DST ° ' 
"WAS DST ° 


" DEST'<HT> 
* (IR) '<HT>" TEST'<HT>' (PC) ® <HT>" (SP) "<HT>'(PSW)' 


"S/B RES WAS RES DST OP SRC OP TEST*<HT>* (PC)'<HT>* (SP) *<HT>* (PSW) ° 


"S/B SP*<HT>'WAS SP'<HT>" (IR) *<HT>' TEST'<HT>" (PC) *<HT>* (PSwW) * 


<HT><HT>* IS R3' 
<HT><HT>* IS R5' 
<15><12>"END PASS # ' 





CQKDA=E KD11-K BASIC 


CQKDAE .P11 


17=SEP= 


020043 
11 


051127 
020120 


042101 


047117 
047503 
052116 
043516 


042040 
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TRAP T 


EOP2: 


IDENT1: 


DH11: 


ABLE 


-ASCIZ <HT>*ERROR COUNT 


eASCIZ <15><12>"CQKDAE KSCIZ ‘TESTS SKIPPED’ 


eASCIZ '' PC''SHT>’ EXPCTD’'<HT>' ACTUAL “<HT>' "(TEST #'S)"' 


/MED DID NOT ABORT IN USER MODE/ 


/MED EXECUTED IN USER MODE/ 


/MED CHANGED PSW/ 


/MICROBREAK TRAP=TO=4 DID NOT OCCUR/ 


/LOGCUA LOGGED WRONG/ 


/CSP CONSTANT WRONG/ 


/BAD DATA READ BY A MED/ 


SEQ 0312 





Cc 9 
CQKDA-E es, aS LOGIC TESTS MACY11 oe 17=SEP=79 09:55 PAGE 314 
CQKDAE .P11 7=SEP=79 09:47 TRAP TAB SEC 0313 


16918 065570 052101 020101 042522 
16919 065576 042101 041040 020131 
604 000104 


20 065 
16921 065612 047516 047440 042104 EM23: .ASCIZ /NO ODD PC TRAP/ 
16922 065620 050040 ae 51124 


065626 
16924 stoeh 117 042104 040440 EM24: -ASCIZ /ODD ADR. BIT NOT SET IN CPU ERR REG OR LOG JAM/ 


1 
16932 065710 044120 Re ete 041040 EM26: .ASCiZ /PHYS BA LOGGED WRONG/ 


000 
065735 103 041501 os5339 EM27: eASCIZ /CACHE PARITY ERROR LOGGED IN BAKUP MODE/ 


066000 000 
16943 066005 103 041501 042510 EM30: -ASCIZ /CACHE PARITY TRAPPED WHEN DISABLED/ 


06604 2514 000104 
16949 066050 og AA 052123 027122 EM41: -ASCIZ /INSTR. NOT ABORTED IN CACHE ABORT MODE / 


EM32: -ASCIZ /MEMGRY ERR REG INCORRECT/ 


EM33: -ASCIZ /TIMEOUT BIT NOT SET IN CPU ERR REG OR LOG JAM/ 


16969 pees? 047516 044440 046114 EM34: eASCIZ /NO ILLEGAL INTERNAL ADR TRAP/ 


16973 066256 051124 885101 000 , 


CQKDA=E KD11-K BASIC LOGIC TES 
CQKDAE .P14 17=SEP=79 09:47 
16974 066263 111 052116 
16975 066270 046101 040440 
16976 066276 2440 051122 
16977 066304 052111 047040 
16978 066312 051440 052105 
16979 066320 020116 050103 
16980 066326 051105 020122 
16981 0663 020107 051117 
16982 066342 043517 045040 
16983 066350 000 
16984 066351 114 051501 
16985 066356 047111 051124 
16986 066 040522 020120 
16987 066372 052103 051117 
16988 066400 052117 604 
16989 066406 042507 020104 
6 066414 043040 04051 
16991 066422 042522 000107 
16992 066426 047514 020107 
16993 066434 051522 020124 
16994 066442 2504 04204 
16995 066450 047040 052117 
16996 066456 044116 04111 
16997 066464 042440 051122 
16998 066472 046040 0435 
16999 066500 052106 051105 


066564 450 
17009 066572 046103 020122 


17026 066723 114 020117 
30 1 


041040 
17028 066736 020105 020046 
17029 066744 020107 040520 


“ 
wn 


047122 
Tl oie 


051105 
041501 
051101 
051124 


020046 


044522 


D9 
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TRAP TABLE 


EM35: -ASCIZ /INTRNAL ADR ERR BIT NOT SET IN CPU ERR REG OR LOG JAM/ 


EM36: eASCIZ "LAST INTR/TRAP VECTOR NOT LOGGED IN FLAG REG" 


EM37: -ASCIZ /LOG FIRST MODE DID NOT INHIBIT ERROR LOG AFTER FIRST ERROR/ 


EM4O: eASCIZ /ERROR LOG WAS NOT REENABLED, ODD ADR BIT CLR IN CPUERR/ 


EM31: -ASCIZ /NO CACHE PARITY TRAP/ 


EM42: eASCIZ /LO & HI BYTE & TAG PARITY BITS NOT SET IN LOG SERVICE/ 


EM43: -ASCIZ /LO & HI BYTE & TAG PARITY BITS NOT SET IN MEM ERR REG/ 


SEQ 0314 


Ee 9 
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CQKDAE .P11 17-SEP-79 ; TRAP TABLE SEQ 9315 


a 


043505 
042510 EM45: -ASCIZ /CACHE TAG LOGGED WRONG/ 


EM16: -ASCIZ /CACHE DATA LOGGED WRONG/ 


EMEIS1: .ASCIZ ‘EIS SET COND CODES WRONG' 


043516 
043440 EMEIS2: .ASCIZ ‘EIS GAVE WRONG RESULT’ 


EM46: ~ASCIZ ‘AUTO=INCREMENT (DECREMT) DID NOT OCCUR IN EIS' 


DHEIS1: .ASCII PSwW'<HT>*REG=WAS-REG+1 *<HT>*REG-S/B=REG*1 "<HT> 


PC*<HT>’ (IR)*<HT>* TEST’ 
PC/<HT>/MEDCODE MICROBK REG./ 


eee 


PC/<HT>/MEDCODE EXPECTD RECEIVD/ 


PC/ 
PC/<HT>/CPUERR/<HT>/LOGJAM/ 


051122 
040512 


043011 : P /  PC/<HT>/FLGREG/ 
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CQKDA=E KD11-K BASIC LOGIC TESTS MACY11 30A(1052) 17=SEP=79 09:55 PAGE 317 
CQKDAE .P11 17=SEP=79 09:47 TRAP TABLE SEQ 0316 
17086 067434 043514 042522 000107 

17087 067442 0 041520 036011 DH26: ASCIZ *) PC'<HT>'<17:16>=S/B PA=<15:0> <17:16>=wAS PA=-<15:0>' 

17088 067450 033461 030472 037066 

17089 067456 051455 041057 050040 

17090 067464 026501 030474 035065 

17091 067472 037 020040 030474 

17092 7500 035067 033061 026476 

17093 067506 040527 020123 04 


17096 067524 020040 041520 046017 DH27: eASCIZ / PC/<HKT>/LOGPBA/<HT>/LOGDATA/<HT>/LOGTAG/ 


Hf A'9-4 067546 004501 047514 052107 


| 
067554 043501 000 


171 

17101 067557 040 950040 004503 DH32: .ASCIZ / PC/<HT>/MEMERR/ 

17102 067564 042515 042515 051122 

17103 067572 

17104 067573 040 050040 004503 DH42: .ASCIZ / PC/<HT>/LOGSERVCE/ 

17105 067600 047514 051507 051105 

17106 067606 041526 000105 

17107 067612 020040 041520 042411 DH44: .ASCIZ / PC/<HT>/EXPCT/<H1>/RECVD/ 
17108 067620 050130 052103 051011 

17109 067626 041505 042126 000 

17110 067634 EVEN 

17111 067634 001016 001076 001100 DT15: .WORD $ERRPC,STMPO,$TMP1,0 

17112 067642 000000 

17113 067644 001016 001100 001102 DT21: .WORD S$ERRPC,$TMP1,$TMP2,$REG0,0 

17114 067652 001062 000000 

17115 067656 001016 001100 001102 D122: .WORD S$ERRPC,STMP1,$TMP2,$TMP3,0 

17116 067664 001104 000000 

17117 067670 001016 000000 DT23: .WORD $ERRPC,O 

ab ber has 001016 001064 001062 DT24: .WORD S$ERRPC,$REG1,$REGO,0 

17120 067704 001016 001062 000000 DI25: .WORD S$ERRPC,$REGO,9 

17121 067712 001016 001064 001066 DI26: .WORD $ERRPC,$REG1,$REG2,$REGO,$REG3,0 
17122 067720 001062 001070 000000 
17123 067726 001016 001070 001064 DT27: .WORD S$ERRPC,$REG3,$REG1,$REG2,0 

17124 067734 000000 

17125 067740 001060 001066 001070 DTEIS1: .WwORD $REGAD,$REG2,$REG3.,$REG1,$REG4 
17126 067746 001064 601072 

17127 067752 001016 0901076 001062 DI46: .WORD $ERRPC,$TMPO,$REGO,0 

ins 067760 .000000 

17130 067762 000 000 DF15: .BYTE 0.0 

17131 067764 000 000 000 DF17: .BYTE 0,0,0 

17132 067770 -EVEN 

17133 067770 DT1 

17134 067770 DT2 

17135 067770 DTS 

17136 067770 001072 DT10 -WORD $REG4 

17137 067772 001070 DT? -WORD $REG3 

17138 067774 001066 DT6: -WORD $REG2 

17139 067776 001064 001062 001016 DTS: -WORD $REG1,$REGO,SERRPC ,$REGS,S$REGAD 0 
17140 070004 001074 001060 000000 : 
17141 070012 001072 001070 001064 DT3: -WORD $REG4,$REG3,$REG1,SREGO,SERRPC ,$REGAD ,0 








Dw 
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CQKDAE .P11 17=SEP=79 09:47 TRAP TABLE SEQ 0317 


17142 070020 001062 001076 001060 
17143 070026 000000 ; 

17144 070030 001016 001124 001062 DI11: -WORD $ERRPC,STESTN, $SREGO,0 
17145 070036 000000 

17146 000001 .END 
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CQKDAE .P11 17=SEP=79 09:47 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0318 
ABASE = 000000 940 
ACDw1 = 000000 940 
ACDW2 = 000000 940 
ACPUOP= 000000 940 955 
ADDWO = 000000 940 
ADDW1 = 000000 940 
ADDW10= 000000 940 
ADDW11= 000000 940 
ADDW12= 000000 940 
ADDW13= 000000 940 
ADDW14= 000000 940 
ADDW15= 000000 940 
ADDW2 = 000000 940 
ADDW3 = 000000 940 

Dw4 = 000000 940 
ADDWS = 000000 940 
ADDW6 = 000000 940 
ADDW7 = 000000 940 
ADDW8 = 000000 940 
ADDW9 = 000000 940 
ADEVCT= 000000 940 946 
ADEVM = 000000 940 
AENV = 000000 940. 951 
AENVM = 000000 940 952 
AFATAL= 000000 940 943 
ALUADD 063340 14017 14022 164234 
ALUSUB 063560 14077 14082 165074 
AMADR1= 000000 940 
AMADR2= 000000 940 
AMADR3= 000000 940 
AMADR4= 000000 940 
AMAMS1= 000000 940 
AMAMS2= 000000 940 
AMAMS3= 000000 940 
AMAMS4= 000000 940 
AMSGAD= 000000 940 948 
AMSGLG= 000000 940 949 
AMSGTY= 000000 940 942 
AMTYP1= 000000 940 
AMTYP2= 000000 940 
AMTYP3= 000000 940 
AMTYP4= 000000 940 
ANDTAB 063420 14137 14142 164514 
APASS = 000000 940 945 
APRIOR= 940 
APTCSU= 000040 16161 163454 
APTENV= 000001 16050 16154 16301 163434 
APTSIZ= 000200 163424 
APTSPO= 000100 16156 16303 163444 
ASP1 064172 166334 
ASP2Z 064260 166614 
ASWRE G= 940 953 
ATA 063302 2651 1 2713 2729 2761 2774 2822 2843 2862 2874 2884 2907 

7642 7653 76 7677 7690 7702 7715 7726 7739 7751 7764 7783 7804 





a 
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CQOKDAE P11 17=SEP=79 09:47 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0319 


9106 9120 9143 9157 9258 9272 9295 $309 9396 9428 9500 9542 9777 
9782 9831 9836 9880 9945 11096 11137 11181 14419 14439 14491 14531 14558 


ATESTN= 000000 9 944 

AUNIT = 000000 940 947 

AUSWR = 000000 940 954 

AVECTi= 000000 940 

AVECT2= 000000 940 

A002 001642 12954 1299 

A015 002112 1461 14664 

A017 002204 1504 15114 

A020 002252 1533 15384 

A021 002302 1555 15604 

A023 002370 1596 16014 

A032 002574 1701 17064 

A033 002634 1723 17284 

A034 002674 1744 17494 

A041 040 1825 18304 

A046 003240 1923 19284 

BASIC 003252 1929 19374 

BEMSG 065211 15921 168734 

BERFLG 063254 4478* 4484 15912* 163944 

BERR 061224 4516 12325 12329 13193 13231 13270 §=(13287 3 =6©13339)0 Ss «13399-13437 )=—S «13468 =.13500)=—s_:« 14927 
191546 15180 15346 15377 15625 15553 15600 15631 15647 15666 #15681 159154 

BETST 061216 4475 159124 ‘ 

BITO = 000001 8224 1229 2307 ~=—-:15171 15429 15466 15547 15584 15621 15648 

BITOO = 000001 8124 2 

BITO1 = 000002 8114 

BITO2 = 000004 8104 820 

BITO3 = 000010 8094 819 

BITO4 = 000020 8084 818 

BITOS = 0 8074 817 “ 

BITO6 = 000100 8064 816 

BITO7 = 000200 8054 815 

BIT08 = 000400 8044 814 

BITO9 = 001000 8034 813 15975 16060 

BIT1 = 8214 2968 15497 

BIT10 = 002000 8024 10036 

BIT11 = 004 8014 10906 15052 15982 

BIT12 = 010000 8004 11718 

BIT13 = 020000 7994 12772 15358 16045 

BIT14 = 040000 7984 13912 15957 

BIT15 = 1 797# 14863 15102 15129 15171 15190 15466 15507 15584 15614 15621 15859 

BIT2 = 8204 3700 15190 15389 15614 

BIT3 = 000010 819% 4209 

BITS = 000020 8184 4934 15350 15604 

BITS = 000040 8174 1233 5807 15435 

BIT6 = 000100 8164 1228 1231 6659 15184 15381 15632 

BIT? = 000200 8154 123 1232 7515 159358 15534 

BIT8 = 000400 8144 8330 

BIT9 = 001000 8134 9251 15097 15148 15358 

BKFLAG 061116 15094* 15106 15126* 15136 15802* 158054 

BKROUT 061110 15092 158024 é 

BPTLOC 063240 2307 2968 3700 4209 4934 5807 6659 7515 8330 9251 10036 10906 11718 
12772 §=6©13912) =: 14863 =—s_ («16,3874 


BPTVEC= 000014 8294 
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CQKDAE .P11 17=SEP=79 09:47 CROSS REFERENCE TABLE == USER SYMBOLS 





SEQ 0320 


12 
13 1314 
BTOQ4 001666 1310 13204 1329 
BT005 001704 1325 13354 1344 
B1006 001722 1340 13504 1357 
B1007 001734 1354 13634 1372 
BT010 001750 1368 13784 1387 
BT011 001766 1384 13934 1403 
BT012 002006 1400 14094 1418 
BT013 002026 1415 146268 1435 
B1014 002052 1432 14414 1450 
BT015 002074 1447 14564 1464 1471 
B1016 002122 1468 1477# 1489 
BT017 002150 1485 14954 1509 1518 
BT020 002224 1513 15244 1536 1542 
BT021 002262 1539 15484 1558 1565 
BT022 002314 1562 15718 1581 
BT023 002340 1578 15874 1599 1605 
1602 16114 1620 


BT045 003140 1880 1883 18884 1898 
BT046 003166 1895 19044 1926 1932 
CATERR 063256 15847 15849* 15863* 15915 159178 15924* 163954 


6 at 
CCR = 177746 1227H 15235* 15237 15287" 15301* 15303 15419 15420 15459* 15463 15465* 15469 15484 


46318 
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CQKDA-E KD11-k BASIC LOGIC 
CQKDAE .P11 17=SEP=79 09:47 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0321 
CLSERV 064546 168024 
CLTAG 064572 16807# 
CLWHAM 064566 168 
CNSCDR 064240 166534 
CNSCTL 064446 167498 
CNSCO 064364 166998 
CNSC1 064366 167004 
CNSC2 064370 167014 
CNSSW 064236 166524 
ENSTSW 064234 166514 
CNSTO 064374 167034 
CNST1 064440 167408 
CNST2 064436 16739# 
COUNT 064461 16760# 
CPUERR= 177766 1226# 15183 15349 15380 15428 15603 15632 15640 
C = 000015 737# 16200 16210 16873 16877 
CRLF = 000200 7384 16171 16210 
CSP1 064346 166914 
CSP2 064374 167034 
€ST200 064372 16702# | 
CUA 064453 16754# 
DBTA 064634 2780 © 3326-~S ss 3338)«=— 3376 = 3388 = 3576 = 3584 (9639S (9659S «9678 = (9689-—s«9702—Ss—«9713 
9727 9748 9775 9802 9829 9856 9878 11029 11049 11070 11092 11114 11136 
11158 11180 11266 16409 16818 

DBTB 064640 3351 3363-3401 «3413 = 3452 3504 «= 3665 = 3705-—«16410—s:168214 
DCSO 064464 167634 
DCS 4 167654 
DDISP = 177570 744% 909 
DF15 067762 1048 17130 
DF17 067764 1075 = 1081.S«171314 
DHEIS1 067225 1204 1211 170614 
DH11 065302 1022 168844 
DH15 067307 1046 170704 
DH17 067341 1073 1079 17075# 
DH2 065065 987 168564 
DH23 067376 1028 1034 1060 1085 1120 1127 1148 1183 17080# 
DH24 067403 1092 1141-1155. s«1169Ss«1176—S« 170818 
DH25 067426 1162 170854 
DH26 = 067442 1106 170874 
DH27 067524 1113 170964 
DH32 067557 1134 1197 171018 

065076 997 168584 
DH42 067578 1190 17104# | 
DH44 067612 1053 1060 1067 1099 171078 

067266 1218 170674 
DISPLA 001042 9094 15997* 16040« 
DISPRE 000174 B44H 
DPTRP = 000001 12294 15237 15459 15469 15484 
DREG 456 16757# 

= 177570 74 908 

DTEIS1 067740 1205 1212171254 
D 067770 983 171338 
DT10 7770 1018 17136 
D111: 070030 1023 17144M 
D715 067634 1047 171114 
DT2 ~—- 067770 988 171348 
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COKDA~E_KD11-K BASIC LOGIC TESTS 

CQKDAE.P11 -17=SEP=79 09:47 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0322 

DT21 067644 1074 171138 

DT22 067656 1080 171154 

DT23 067670 1029 1035 1041 1086 1121 1128 1149 1184 17117M 

D124 067674 1054 1061 1068 1093 1100 1142 1156 1170 1177 171188 

6125 067704 1135-1163) 1191,-S «1198-17120 

D126 © 067712 1107171214 

DI27 067726 1114 17123m 

bT3 =: 070012 993 171414 

014 = 067770 998 171354 

D146 067752 1219 171278 

OTS 067776 1003 17139" 

B16 =: 067774 1008 171384 

DT? —s- 067772 1013-17137 

DWTA 063326 2332 2334 = 2535. 2581 = 2585 2604 «= 2608 ~=— 2653S 2707S 2725S 2756) 2816 2842 
2861 2 2923 3176 = 3177, 3188 = 3194 3213S 3214 = 3215 = 3225S 3231S 3250 
3251 3252, 3262S 3268 «= 3287S 3288 «= 3299) 3305S 3528 «= 3540 = 3550 = 3562 = 6692 
7641 7665 «= 7689S 7714=S ss 7738-)~=— 7782S 7803S 7824 = 7845 = 7874 «= 7908S 7932S 7961 
7990 8019 8048 8077 8099 8121 8143 8640 8903 8935 8966 8998 9031 
9068 9105 9142 9179 9216 9257 9294 9331 9363 9395 9427 10515 10542 
10597 10624 10651 10677 10704 10759 10788 16407 16418 

DWIB_ 064036 2557, 2559-2913 3426 = 3478 = 3612S 8620 «3647 = 3683S 8613-16408 =—:166 908 

EAQI7? 002172 1501 1502 1503 1506# 

EA020 002246 15354 

EAQ21 002276 15574 

EA023 002 1593 1594 = 1595S s«1598 

EAO32 002570 1703 

FA033 002630 1725 

EA034 002670 17464 

EA041 003034 18274 

EA0G6 003234 1925 

EMEIS1 067070 1208 170444 

EMEIS2 067121 1210 170494 

EMTVEC= 000030 8324 

EMI 064644 981 168274 

EM10 064730 1016 168394 

EM11 065264 1021 168814 

EM12 065340 1027 16889" 

EM13. 065377 1033 16895# 

EM14 065431 1039 169004 

EMi5 065451 1045 169034 

EM16 067040 1052 17040# 

EM17 065514 1098 16909 

EM2 644 168284 

EM21 065540 1072 169134 

EM22 065563 1078 16917# 

EM23 065612 1084 16921# 

EM24 065631 1091 16924 

EM26 065710 1066 1105 169328 

EM27 065735 1112 16936# 

EM3 (065017 991 16849" 

EM30 066005 1119 16943 

EM31 066610 1126 17012e 

EM32 066117 1133 16956# 

EM33 066150 1140 169614 

EM34 066226 1147 169608 

EM35 (066263 11546 16974a 





CQKDA=E 7 eee 


CQKDAE .P11 
EM36 © 066351 
EM3? (066426 
EMG 064644 
EM4O =: 066521 
EM41 066050 
EM42 = 066635 
EM43 066723 
EM45 = 067011 
EM46 067147 
EMS 064672 
M6 064 
EM? 064654 
FOP? 065107 
EOP2 = 065125 
ERRA 062044 
ERRFLG 063244 
ERRVEC 
EXO02 001644 
E001 001636 
E003 001662 
£004 001700 
E00S 001716 
E006 001730 
E007 001744 
E010 001762 
E011 2002 
E012 00202 
E013 204 
E014 002070 
E016 © 002142 
E022 002334 
£024 002420 
E025 002440 
E026 002460 
E027 25 
E030 002520 
E031 002540 
£035 002720 
E036 002740 
£037 27 
E040 
E042 
E043 003106 
£044 3134 
£045 3162 
E1015A 002106 
£2002 001650 
E2015 002116 
E2017 002212 
2020 002256 
E2021 002310 
E2023 002374 
£2032 002600 
E2033 002640 
£2034 002700 
E2041 003044 


ou 
olan) 
no 


ono. Oe 
SS~F0Re WBS Co. 
— NOOO OM NO Co — 


s+NNO 
adh ant aad 
WOW 


nm 
w 
= 
w 


169844 


m9 
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16072* 
14927* 


163904 
15962 


14878 
15804 


15963* 


15965* 


15968* 


SEQ 0323 
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002242 
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MACY11 304(1052) 





B 10 
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CQKDA-E KD11-K BAS! 
CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0325 


LOG 


oe 
oO 
mn 


C 
CQKDAE .P11 17-SEP-79 


SST eSeesy NS 


$ 


115114 


16210 16873 16877 


12338 =6©12356 = 12375, 12405) 12618 = 12649 12680) = 12711) Ss 12742) 12777 Ss 12842 
15507 
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CQKDAE .P11 17-SEP-79 09:47 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0326 
9920 9942 9964 9967 9986 9989 10255 10284 10313 10342 10371 10400 10428 
10457 910486 §=10757 10786 10815 10845 10875 10909 10939 10969 10999 11047 11068 
11090 =11112 = =611175) 1113411156) 11159) 17178 )3=— 11200) 11221) 11226 39 11243-11264 = s-11267 
12897* 12919* 1 13873 = 13952* 13958 14352 14383 14403 14420* 14455 14456* 14475 
14492* 14527 14559* 16411 164144 
MBUF1 063322 2167 2186 2724 2729* 2942 3323 3348 3373 3398 7856* 7 7885* 7889 
7914* 7918 7943* 7947 7972* 7976 8001* 8005 8030* 8034 8059* 8063 
8725 9562 0569 10731 10817 10847 10877 10911 10941 10971 11001 12898« 
12928 =12935* 131 13177, 13206): 113216 Ss: 13874 =—s- 113918* 13924 16412 164164 
MD 064444 167474 
MED = 076600 12224 13811 14918 14931 14962 14967 14970 14974 15008 15021 15050 15053 15061 
15095 =15098 §=15100 15103 15114 15127 15130 15134 15146 15149 15151 15172 15181 
15196 =15203 «8615215 = 15242152464 15246) = 15251) = 15257) 15263-15269) = 15275. «15308 =: 115313 
15347 15364 Ss 15378 )=. 15395) 15426 = 15467 Ss: 15473) = 15482) 15494 = 15515) 15526 )= 15540 )=— «15548 
15554 15585 15601 15623 15638 15649 15667 15682 15762 
MEDHLT 055636 14933 14934 14935 149374 
MEDT1 055646 149544 
MEDT1O0 056212 150554 
MEDT11 056264 150914 15153 
MEDT3 (056046 150054 
MEDT4 056104 150194 
055616 149304 
MED1 055520 149114 
MEMERR= 177744 12254 15316 15320 15506 
NOPS 064410 167184 
NUA 064462 167614 
OBUF 063262 4592 4613 164004 
ONCE 063260 1937* 1942 4644 4646* 163974 
ORTAB 063500 14197 = 14202 = 164794 
P. = 000200 12304 15459 
PA1500 064166 166154 
PA1716 064164 166144 
064452 167534 
PIRQ = 177772 742k 
PIRQVE= 000240 8364 
PRIFLG 063242 1940 4411* 4420* 16127* 163894 
PRINA 062206 4413 161274 
PRO = 000000 759" 
PR1 = 000040 7604 
PR2 = 000100 7614 
PRS = 000140 7624 
PR&4 = 000200 7634 
PRS = 000240 7644 
PR6 = 000300 7654 
PR7 = 000340 7664 
PS = 177776 7394 740 1283* 
PSW = 177776 7404 1442 1456 1477 1495 1506 1515 1524 1573* 1587 1611 1615 1628 
1641 1694 1695* 1716 1717* =1737 1738* 1801 1817 2007* 2022* 0 4236* 
4244 4248* 4267* 4272 4276* 4290* 4298 4302* 4309* 4316* 4351* 4359 4363* 
4370* 4377* 4390* 4395 4398*  4649* 4691 4697 4711 4719 4733 4739 4753 
4761 12120 12127* 12135 12157 12164* 72 «12221-12224 = 12281 12284 = 12381* = 12412* 
12427* 12438* 12444 12456 12459% 12471% 12477 12489 12492% 12517* 12523* 12540 12547* 
12574* 12580* 12597 12604* 12623* 12638* 12654* 12669* 12685* 12700* 12716* 12731* 12747* 
12762* 12782* 12798* 12814* 12830* 12850* 12860* 12896* 12917* 12953* 14692" 14721 14722 
14912* 14930* 14954* 15786* 
PSWHOL 064054 166094 
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119884 


CQKDA=E KD11=-K BASIC LOGIC TESTS MACY11 30A(1052) 
CQKDAE .P11 17=SEP=79 09:47 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0327 
PTRP1 057716 15470 154814 
PWRUP 061060 18776 8157854 
PwWRVE C= 8314 15740* 15741* 15750* 15756* 15771* 15772 
RCSR = 177560 12674 4502 4588 
R = 177562 12684 
RDFLAG= 000144 12434 15051 15101 15128 
RDLCUA= 000103 12514 15115 
RDLDAT= 0001 1257H 15270 15541 
RDLFGI= 000104 12534 15396 15555 15668 15683 
RDLJAM= 000100 124654 15182 15348 15379 15427 15602 15639 
RDLPBA= 000102 1249# 15197 15264 15365 £15516 
RDLSER= 000101 12474 15204 15495 
RDLTAG= 000107 12594 15276 15527 
RDLWHA= 000105 12554 
R = 000022 12414 15096 15147 
RES 064463 167624 
RESTAR 061202 15851 15860 158624 15865 15919 15926 
RESVEC= 000010 82 14915* 14928* 
REV 064457 167584 
RSBERT 061154 158544 15922 
RSERR 061126 4466 13848 14928 158474 
RSMSG 52 15853 168774 
RSVFLG 063252 4454* 6460* 15844* 163934 
158444 
16006* 163924 
15954 163914 


CQKDA-E KD11=K BASIC LOGIC TESTS 
17=SEP=79 09:47 


CQKDAE .P11 
SREG 064460 
STACK = 001 
START 001630 
STGBLK 06406 
STKLMT= 177776 
SWBO1 = 71 
SWR 001040 
SWREG 000176 
SwO = 000001 
SwOO = 000001 
SwO1 = 000002 
SwO2 = 000004 
SwO3 = 000010 
SWO4 = 000020 
SwOS = 000040 
SwO6 = 000100 
SwO7? = 000200 
SwO8 = 000400 
SwO9 = 001000 
Swi = 000002 
Sw10 = 002000 
Sw11 = 004000 
SW12 = 010000 
SW13 = 020000 
SW14 = 040000 
Sw15 = 100000 
SW2 = 000004 
SW3 = 000010 
Sw4 = 000020 
Sw5 = 000040 
Sw = 000100 
SW7 = 000200 
SWB = 000400 
Sw9 = 001000 
TABBEG 064056 
TABEND 064060 
TAG = 000040 
TBITVE= 000014 
TBL2 064172 
TBL3 064410 
TBL4 064426 
TBLS 064442 
TBL6 064470 
TBL? 064542 
TBSER 061074 
TKVEC = 

TLOC1 064052 
TLOC2 064170 
TPVEC = 
TRAPVE= 34 
TRIVEC= 14 
TSET 052426 
TSTO 00332 
TST1 0033 
TST10 003536 


167594 
7304 


15497 
166314 
167174 


167434 
167714 
167994 
157934 


15248 


4650 
19654 
20674 


E 10 
MACY11 30A(1052) 17=SEP=79 09:55 PAGE 330 
CROSS REFERENCE TABLE == USER SYMBOLS 


1928 1944 14913 15785 
15787 


15109 §=15113 
4642 157468 15764* 15850 15859 15918 15950 


15850 15918 


15507 


15299 15306 = 15461 15471-15517, 1552115529 


15952 


166084 


15957 





15975 


SEQ 0328 


15982 
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CQKDAE .P11 17=SEP=79 09:47 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0329 
TST100 007204 3238 32478 
TST101 0073 3275 32844 
TST102 007372 3312 33214 
TST103 007452 3339 33464 
TST104 007532 3364 33714 
TST105 007612 3389 33964 
TST106 007672 3414 34224 
TST107 007750 3440 34484 
TST11 003570 2076 20844 
TST110 010026 34 34744 
TST111 010106 3492 35004 
TST112 010166 3518 35264 
TST115 010230 3541 35484 
TST114 010272 3563 35714 
TST115 010362 34074 
TST116 010452 36434 
i$sT11 010514 3654 36614 
TST12 26 2098 21064 
TST120 010556 3672 36794 
TST121 010620 3690 36974 
TST122 010674 3712 37204 
TST123 010720 3728 37364 
TST124 010756 3756 37644 
TST125 010774 3770 37784 
TST126 011010 3784 37924 
TST127 011024 3798 38064 
TST13 3662 2120 21284 
TST130 011044 3813 38214 
TST131 011064 3828 38364 
TST132 011102 3843 38514 
TST133 011120 3857 38654 
TST134 011136 3872 38804 
TST135 011154 3887 38954 
TST1360 011174 3902 39104 
TST137 011214 3917 39254 
TST14 003714 2138 21464 
TST140 011234 3932 39404 
TST141 011254 3947 39554 
TST142 011270 3961 39694 
TST14 011310 3976 39844 
TST144 011330 3991 39994 
TST145 011350 4006 40144 
TST146 011366 4021 40294 
TST147 011402 4035 40434 
TST15 003 2156 21644 
TST150 011422 4050 40584 
TST151 011442 4065 40734 
TST152 011462 4080 40884 
TST153 011530 4106 41144 
TST154 011572 4124 41324 
TST155 011626 4141 41494 
TST156 011714 4177 41854 | 
TST157 011750 4198 42064 
TST16 004014 2175 21834 
TST160 012016 4222 42304 
TST161 012106 4253 42614 





G 10 
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CQKDA=E KD11-K BASIC LOGIC TE 

CQKDAE .P11 17=SEP=79 09:47 CROSS REFERENCE TABLE <= USER SYMBOLS SEQ 0330 
TST162 012156 4274 42834 
TST163 012300 4314 43234 
TST164 012346 43444 

TST165 012470 4375 43844 
TST166 012544 44074 

TST167 012624 4421 44294 
TST17 004060 2194 22024 
TST170 012670 4441 44484 
TST171 012752 44724 

TST172 013022 4485 44934 
TST173 013122 45214 

TST174 (013162 4531 45424 
TST175 013214 4551 45604 
TST176 =013250 4569 45864 
TST177. =—(013562 46584 

TST2 003354 1971 19794 
TST20 0046114 2212 22194 
TST 013604 4665 46724 
TST201 013624 4679 + 46864 
TST202 4699 47064 
TST203 013726 4721 47284 
TST204 013764 4741 47484 
TST205 014024 4763 47704 
TST206 014046 4777 47844 
TST207 014070 4792 47994 
TST21 004160 2234 22424 
TST210 014112 4807 48144 
TST211 014134 4822 48294 
TST212 014160 4837 48444 
TST213 014202 4851 48584 
TST214 014224 4866 48734 
TST215 014246 4881 48884 
TST216 014270 4896 49034 
TST217 014336 4922 49294 
TST22 004220 2257 22654 
TST220 014400 4943 49504 
TST221 014446 4969 49764 
TST222 014500 4986 

TST223 014626 5038 50454 
TST224 014662 5055 50624 
TST225 014732 5081 50884 
TST226 014770 50 51064 
TST227 015040 5125 51324 
TST23 254 2274 22824 
TST230 015110 5151 51584 
TST231 015240 5203 52104 
TST232 015314 5230 52374 
TST233 015360 5256 52634 
TST234 015430 5282 52894 
TST235 015476 5308 53154 
TST236 015546 5335 53424 
TST237 015622 5362 53694 
TST24 004314 2296 23044 
1ST240 015676 5389 53964 
TST241 015750 5416 54234 


TST24e 016020 5442 54494 








CQKDA=E KD11=K BAS 
CQKDAE P17 17*S$ 


022024 





IC 
EP 





LOGIC TESTS 
-79 09:47 
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SEQ 0331 
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TST324 


I 10 
CQKDA=E KD11-K BAS MACY11 30A(1052) 17=SEP=79 09:55 PAGE 334 -s Soe 








a 


: J 10 
CQKDA-E KD11=k BASIC LOG MACY11 30A(1052) 17=SEP=79° 09:55 PAGE 335 


C 
CQKDAE .P 11 17=SEP=79 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0333 
026276 





K 10 
CQKDA=E KD11-K BASIC LOGIC TESTS MACY11 30A(1052)_ 17=SEP=79 09:55 PAGE 336 
CQKDAE .P11 17=SEP=79 09:47 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0334 
TST467 033046 9507 95154 
TST47 = 005424 2691 26994 
TST471 033152 9549 95584 
TST472 033216 9571 95798 
TST473 033270 9599 064 
TST474 033342 9627 96344 
TST475 033400 9647 96544 
TST476 033440 9666 96734 
TST477 033506 96974 
TSTS 003430 2012 20204 
TSTSO ©005466 2714 2722n 
TSTSOO 033554 9714 97214 
TST501 033620 9734 9742k 
TSTSO2 033676 9762 97694 
TST5O3 033756 9788 97964 
TSTS04 034034 9815 98254 
TSTSOS 034114 9842 98504 
TSTSO06 934166 9864 98724 
TSTSO7 034240 9886 98944 
TSTS1. = 005524 2731 27398 
TSTS10 034306 9908 99164 
TST511 034354 9930 99384 
TST512 034424 9952 99604 
TST513. 034474 9974 99824 
TST514 034546 100044 
TSTS15 034622 10024 100314 
TST516 034702 10055 100624 
TSTS17 034756 10082 100894 
TSTS52 005550 27544 
TST520 035024 10109 +=101164 
TST521 035102 10136 §=101444 
TSTS522 035154 10164 101714 
TST523 035226 10191 += 101984 
TST524 035300 10218 102254 
TST525 035352 10244 102514 
TST526 035434 10272 = 102804 
TSTS27 035510 10301 103094 
TST53 5 2772n 
TSTS30 035572 10330 103384 
TST531 035646 10359 +=103674 
TST532 035730 10388 103964 
TST533 036012 10417 104244 
TST534 03607 10445 104534 
TST535 036154 10474 104824 
TST536 036234 ®. 10502 +=105104 
TST537 036310 10530 105374 
TSTS4 005636 2781 27894 
TST540 036 10557 + =105644 
TST541 036440 10585 105924 
TST542 036510 10612 106194 
TST543 036562 10639 106464 
TST544 0366 10666 106724 
TST545 036706 10692 106994 
TST546 036760 10719 += 107264 
TST547 037036 10746 =610753 








L 10 
CQKDA=E KD11-K BASIC L MACY11 30A(1052) 17=SEP=79 09:55 PAGE 337 
CQKDAE .P11 17=SEP=7 : CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0335 


005704 
0 


eee et od od od od 4 3 SY I ee ed od od od od od 


RON 


1 
, 
1 
, 
, 
1 
1 
1 


RERRRRRSRRRRRRK 
DONNY SS HS GH 2 SS So 
me ed ed td od od 

ee a | 

— a =f) SS 

fb gh Ab yeah ath 

COWOCDOVIWN 

ile! Meee 


OO NON fw 


Wensgk ow 


me et et et od — 


119994 


— et et 3 


b ohe) 


Ww 
~— 
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CQKDA=E_KD11-K BASIC LOGIC TESTS MACY11 30A(1052) 17=SEP=79 09:55 PAGE 338 
CQKDAE .P11 17=SEP=79 09:47 CROSS REFERENCE TABLE <= USER SYMBOLS SEQ 0336 
TST630 043110 12030 120374 
TST631 043144 12049 120564 
TST632 0432 12068 120754 
TST633 043302 12105 9121164 
TST634 0434 12142 121534 
TST635 043514 12179 = 121904 
TST636 043672 12206 §=12214 = 12226) 12235 122504 
TST637 044050 12266 §=12274 = 12286) 12295 Ss: 12310# 
TST64 0063 2957 29654 
TST640 044132 123344 
TST641 044166 12344 9123524 
TST642 044224 12362 8123704 
TST643 0443 124004 
TST644 044454 124324 
TST645 044572 124654 
TST646 044706 124984 
TST647 045112 125554 
TST65 35 2985 29934 
TST650 045314 126124 
TST651 045432 126434 
TST652 045550 126744 
TST653 045666 127054 
TST654 127364 
TST655 046122 127674 
TST656 046254 128034 
TST657 046374 128384 
TST66 =—006412 3003 30114 | 
TST660 046534 128834 
TST661 047034 129664 
TST662 047102 129864 
TST663 72 130264 
TST664 047352 130644 
TST665 047434 130894 
TST666 047516 131144 
TST667 047 131394 
TST67 006450 3021 30294 
TST670 047664 131634 
TST671 047772 13194 132024 
TST672 0501 13232 132404 
TST673 050240 13271 132924 
TST674 050422 13340 3=133524 
TST675 050604 13400 134124 
TST676 050700 134424 
TST677 051004 134744 
TST7 003502 2044 20514 
TST70 006510 3039 30474 
TST700 051110 135064 
TST701 051170 135294 
TST702 051250 135524 
TST703 051330 135744 
TST704 051430- 136074 
TST705 051534 13625 = 136424 
TST706 051642 13660 136774 
TST707 051750 13695 137124 
TST71_ 006540 3056 30644 


TST710 052036 137384 





CQKDA-E_ KDi1-K 
CQKDAE .P11 


TST711 052124 


TST726 34 
TST727 053410 
TST73 

TST730 05 
TST731 053550 
TST732 


06 
TST77 = 007110 
TYPE = 104401 


TYPOC = 104402 


BAS! 
17=SE 


C LOG 
P=79 


142844 


31734 


N 10 ae 
"MACY11 30A(1052) 17=SEP=79 09:55 PAGE 339 
CROSS REFERENCE TABLE == USER SYMBOLS 


15856 


15920 


16048 


16083 


16100 


SEQ 0357 


16102 


B 11 
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CQKDA-E KD11=K BASIC LOGIC TE 
CQKDAE .P1~ 17-SEP-79 09:47 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0338 
TYPON = 104404 163814 
TYPOS = 104403 163804 
UBREAK= 177770 12244 1945* 16911 15091" 15125* 15155» 
UCNSCT 064500 167774 
UCOUNT 064526 167884 
UCUA 064512 167824 
UDCSO 534 167914 
UDCS1 064540 167934 
UDREG 064520 167854 
UFLAG 064514 167834 
UINIT 064536 167924 
UJAM 064504 167794 
ULCDTA 064470 167734 

= 140000 1 
UMD 064474 167754 
UNUA 064530 167894 
UPBA 064510 167814 
URES 064532 167904 
UREV 064522 167864 
UR6A 064222 166464 
UR68 064312 166764 
USERV 064506 167804 
USREG 064524 167874 
VADR 064162 166134 
WCNSSW= 000226 12404 15763 
WCSADR 064322 166804 
WCSA.0 064226 166484 
WCSA.1 064230 166494 
WCSB.0 064316 166784 
WCSB.1 064320 166794 
WRFLAG= 000344 12444 15054 15104 15131 15150 
WRLCUA= 000303 12524 
WRLDAT= 000306 12584 15245 
WRLFGI= 000304 12544 
WRLJAM= 000 12464 
WRLPBA= 000302 12504 15243 
WRLSER= 000301 12484 
WRLTAG= 000307 12604 15247 
WRL WHA= 305 12564 
WRWHAM= 000222 12424 15099 15152 15173 216 §=©15468 15549 15586 15624 15650 
WP = 1 15235 15301 15303 15463 15465 
XCSR = 177564 12694 & 4544 4562 437 = =12460* 12470 12493* 12504 12561 12809 12890 
XDBR = 177566 12704 
SAPTHD 700 8 8644 
SASTAT= seeaee 16323 16338 
SATYC 062750 16294 
SATY1 062724 162924 
SATY3 062732 16159 162934 
S$ATY4 062742 16053 162954 
SAUTOB 001034 9054 
S$BDADR 001022 
SBDDAT 001026 9024 
SCHARC 062472 16176* 16186* 16193 16202* 162074 

= wkeeene 16384 
SCMTAG 001000 8884 
$CM1 = 000006 9204 9214 9224 9234 9244 9254 9264 


C 11 
MACY117 30A(1052) 17=SEP=79 09:55 PAGE 341 
AE .P11 17-S : CROSS REFERENCE TABLE -=- USER SYMBOLS SEQ 0339 


922n 9234 9244 9¢5a 9264 

9284 9298 9304 9314 
15857, 16048 »=6 16071 =: 16083 Ss -« 16102) = 16107) = 16111 Ss «16175 = 16210 
157274 


16325 
16303 


15979* 16038* 16071 


15662 
001016 8984 16 = TIT «=o 17TIS OTPTIS. FTF =s17T1S OO FTeS Ta 
001150 


16041* 
16063 


16332* 163404 


15986* 15989* 
15756 


16044* 
6071 


14220* 
15992 
163384 


16327 = 16331* 








D 11 
CQKDA-E KD11-K BAS MACY11 30A(1052)_ 17=SEP=79 09:55 PAGE 342 
CQKDAE .P11 17=SEP= : CROSS REFERENCE TABLE -= USER SYMBOLS SEQ 0340 


$NWTST= 000001 


1 
173 
2 
255 
2 


4 St i ss ss SS SS Ss Ss ss Ss SS 


1 
1 
1 
1 
1 
134 
1 
1 
1 
1 
1 


MES EW 
mocw— co 


5 
155654 
162874 
15730 15984 16005 


062720 


1§771 


16210 


keenee | 
eeetee |) 
keneee |) 
eereee |) 





a 





CQKDA-E KD11-K BASI 
CQKDAE .P 14 S 


060662 


kkk hk 
tkkkkk 
061046 
061264 
000000 


961530 
000714 
165000 


541 


MACY11 30A(1052) 


WWRNNNNW 
ROM S358 
— 


E 11 
17=SEP=79 09:55 PAGE 343 
CROSS REFERENCE TABLE == USER SYMBOLS 


16067 


a ani ceed al an cal el cl el el cel el 
SfWWINRNRe eS 

wm 

Ww 


62* 
87* 


oO 
SIW 
os 
NM 


and al ail <i and al ei ci wa wad sd onl 
SWAG er SO 
OnNO—-WoOVWW" 
MmORAOONON™N 


17121 


8964 
9424 


e) 
N 
Nm 


att wiabebaiabh~uab ab abu 
ASRFASSIANVSUG 


WYAWWDO SNA 


SEQ 0341 
17127) 17139) 1714117144 


12300* 13001* 13009* 13016* 
1385" 13365* 13375* 13385* 


nN 
So 
Go 
oO 
Nm 
— 
So 
co 
N 
— 
Ww 
‘ Oo 
N 
——s 
> 
Oo 


8639 8693 8723 
8996 9028 9065 9102 
9456 9477 9498 9519 
9746 9773 9800 9827 
10066 10093 10120 10148 
10428 10457 10486 10514 
10786 10815 10845 10875 
11134 =11156 11178 11200 
11437 11468 )3=11490 Ss: 11520 
11800 11833 11865 11898 
12157 = 12194-12254 =: 12314 
12647 12678 12709 12740 
13118 13143 13167 13206 
13578 13611 13646 13681 
13952-13969) 14017) = 14077 
14486 14522 14553 14577 
14862 «614911 14954 =: 15005 





CQKDA=E KD11-K BA 


CQKDAE .P11 
SSWREG 001142 
SSWRMK 

STESTN 001124 
STIMES 001110 
$TKB 001046 
$TKS 001044 
STMPO 1076 
STMP1 001100 
sTmP2 001102 
STMP3 001104 
STMP4 = 001106 
STN 000770 


F 11 
MACY11 30A(1052) 17=SEP=79 09:55 PAGE 344 
CROSS REFERENCE TABLE -=- USER SYMBOLS 


15992* 
12469* 


14378* 


15937 
15997 


16002* 
15704* 


17144 


15417 
15939 
16018 


4 
4660 
47104 


14577* 


15704 
15972 
16045 


14635* 





SEQ 0342 


14664 * 


-——--— 


G 11 
CQKDA=E KD11-K BASIC IC TESTS MACY11 30A(1052) 17=SEP=79 09:55 PAGE 345 
CQKDAE .P11 17=SEP=79 09:47 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0343 


4745 4750 its 4763 4767 4772 4774# 4777 4781 4786 rth 5 4792 4796 





48484 51 4855 & 48624 4866 4870 4875 48778 81 4885 48 48924 
4896 4900 4905 49074 4 4926 4931 49334 4943 4947 4952 49544 969 
4973 4978 49804 86 995 49978 5038 5042 5047 50494 5055 5059 
5064 5 5081 5085 50924 5099 5103 5108 51104 1 5129 1 
5151 5155 1 51624 03 5207 5212 52144 5230 5239 52414 
5256 5260 5265 52674 5286 291 52934 530 5312 5317 53194 5335 
5339 5344 53464 536 5366 5371 53734 5389 5393 5398 54004 5416 5420 | 
5425 54274 = 55442 5446 5451 54534 5468 5472 5477 5479# = §=5494 5498 5503 
55054 20 5524 5529 55314 5546 5550 5555 55574 5576 5581 55834 
5603 56104 5626 5633 5636 56384 5654 5659 5 5 5 
5687 5692 56944 5710 5715 5720 5722 5738 5743 5748 57504 5768 5773 
5778 57804 “ 5804 58064 5829 5834 5839 58414 5855 0 
58674 8 5891 58984 5912 5917 5922 59244 4 5947 5952 59544 
5967 5972 5977 59794 5994 5998 6003 60054 602 6025 60324 7 
6051 056 60584 6072 6076 6081 60834 609 6102 6107 6109 6124 6128 
6133 61354 6150 6154 6159 61614 6176 6180 6185 61874 6202 6206 6211 
62134 6228 6232 6237 62394 6253 6257 6262 62644 6279 6283 6288 62 
6305 6309 6314 63164 6331 6335 6340 63424 6357 6361 63684 6382 
6 6391 63934 6408 6412 6417 6419 6434 6438 6443 64454 
69 64714 6486 64 9 64974 6512 6516 6521 65234 6538 6542 6547 
65494 6564 6568 6573 65754 6590 6594 6599 66014 6617 6622 27 66294 
6 6651 6 66584 78 6683 6688 66904 6710 6715 6720 67224 6737 
6742 6747 67494 6764 6769 6774 67764 6791 6796 1 68034 6818 6823 
6828 6830 6845 6850 68574 6872 6877 688 68844 6898 6903 6908 
69104 6925 6930 6935 69374 6952 6957 6962 69644 6979 69 69914 
7006 7011 7016 70184 7033 7038 7043 70454 7060 7070 7072 7087 
7092 7097 70994 7114 7119 71264 7141 7146 7151 71534 7168 7173 
7178 71804 7195 7200 72074 7222 7227 7232 72344 7249 7254 7259 
72614 7276 7280 7285 72874 7302 7306 7311 73134 7328 7332 7337 73394 
7358 7363 73654 7380 7384 7389 73914 7406 7411 7416 74184 7428 
7433 7438 74404 7454 7459 7464 74664 7475 7480 7485 74874 7502 7507 
7512 75144 7528 7533 75404 7554 7559 75 75664 7575 7580 7585 
75878 6 7607 7612 76144 7630 7634 7639 76414 7654 7658 76654 
7678 7682 7687 76894 7703 7707 7712 77144 772 7731 7 77384 = 7752 
7756 7761 77634 8 7771 7775 7780 77824 7795 8 78024 7811 7816 
7821 78234 7832 7837 78444 7862 7866 787% 78734 7891 7895 
79024 7920 7924 7929 79314 7949 7953 7958 79604 7978 7982 7987 79894 
8007 8011 8016 80184 8036 8040 804 80474 8065 8069 80764 
8091 80984 8108 8113 8118 81204 8130 8135 81424 8152 8157 
8162 81644 8179 8183 81904 8206 8210 8215 82174 8233 8237 8242 
82444 8260 82 82714 8288 8293 8298 83004 8317 8322 8327 83294 
8350 8355 83624 8384 8389 83914 8407 8411 8416 
38 84454 84 470 8472# 848 8492 8497 a 8515 8519 
8524 85264 54 8548 8553 85554 8572 8577 8582 85844 8600 8605 8610 
86124 2 2 8637 86394 8659 8664 8 8 86 9 86934 
8711 8716 872) 87234 8742 8747 8752 87544 8769 8773 8778 87804 8795 
8799 8806" 8821 8825 0 88324 8847 8851 88584 8867 8872 
8877 88794 88 8893 8898 89004 919 8925 8930 89324 8951 8957 8962 
89644 8989 ~ 15 9021 9026 90284 9058 3 90654 
9089 9 9 91024 9126 9132 9137 91394 9163 9169 9174 91764 9 
9 9211 92134 9243 9248 92504 9284 92918 315 9321 
9326 93284 9353 9358 93604 9379 9385 9 93928 9417 9422 
9424m 43 9449 9454 94564 465 9470 9475 94778 486 9491 4 94988 


94 9 9 96 
9507 9512 9517 9519 9528 9533 9538 95404 9549 9555 9560 95628 9577 











-— 


SEQ 0344 


ERS SAMA SRB SAA SONNE LO ERERT AINE 


ee a eS 


LemSrumodic ms a Oma onwoms REVS Hers 
FLRECS_RRASRSKR MRSS ARNG eH SOR SSS 


252 
2349 
2462 
2645 
2983 
3116 

237 

414 

767 

8964 

982 

242 

3474 

476 

571 

663 


— UMM at TNOOR. OKO 


Bore DMDOOWROMeH—wTor 
NOK FOUMANOKRDOARM M~rwo 
OnK- HK NMMTTNOOR OOO WOor.00 


247 
344 
4364 
640 
769 
9704 
11 
32 
: 
3644 
2 
969 
222 
4346 
44504 
4567 
4658 
755 
3 
0 
3 
6 


WRK OM — MMM — OOo OM 7 OOO TATA) 
Om UMMT TN ODOR DAO UM TOR AOCTM OR. OK — MFM OR. 


3 ® = ee 32 zz 
mR — WO RRM TDOANnNTOMOOR WOR OrRwOu 
pg a alte 4b a AND te Be fe M—CUMCu w 


= ye = 
MN OMT — CUM. AO Lo VISA KH FRWDN OD TOM. 
—O—DNMAN— AMANO OOWUO—-—MOOMADANO--MO 
oO woOonr.0OO-— MN OR. 00 


b>. 3 3 z= bh bed 
DOR. OFMA—NOKK 
3 2 


O-— NOM TTIW OR. ORO 


733 
885 


SSBES 


= 
vwvwvw TORR AODO 
we An-—an Sx 
NOM ST TAN OR. OKOOO MMNK. CO 
tell al ool cel ool ol see oll el el eel oe © O11 OO OY Ole) al 


Saati ceil Soe suet neni Saeetic aeei ee cee niet eet eee cee ae cee ee oe ee oe 


H 11 


17-SEP-79 09:55 PAGE 346 


CROSS REFERENCE TABLE -- USER SYMBOLS 
48 
53 
15 
77 


Re 
™N fon 
_ Oo 
nm 


= 3 
mn Bowens wwosow- sma TFAOWOT OMRAMAKwARS 
Oon~wTe- SX anak roe MOR MODOCDMMMM—KRAOR. 
LES Sess Soe aeecoe On- NVOMT TON OR WOKOOe-MM 


Cet set cel el sel el el el el ool el ol oe 11 OY LO LO) OS 


bad 3 = bh & 3 bal aa Baa & zr _ z 
AAD ooCooco DDD NIKI NUIKUINUI NIKI CUM MI MM MMMM) St NT TT TTT TIN 
CC ee 


089 


WOUNK OBA OL —- AX Le SBuorios 


MACY11 30A(1052) 


= 
RE CUMCUMMAR. MO OOWO OOr ~~ 
Cave CNR Sn ae eo. Mmnr 
ee eee o-w 


Sl eel eel el el el el cel el el el el el aoe YY | 





OK VUMMTNANOOODAAO-Nv 
COP mR RK RR RR RRR RK KN 
CS LLCO LOLOL CC COC CCL KK 


3 .<3 7 z= = 3 ® 
. PORK WA 9 SUR TRMWON RAAQMAN— omMmmMuN Saw QNSYY 
Key RN OOMMO- ek We ON KR TOW H-AMNMMNOMNORO ae) alae 
AAAOAO lelelelelelelela) fovTaViaViaviavl a) 
ECE COC FELl SEE EK FPF EFF Ee re 





CQKDA=E KD11-K 


CQKDAE .P11 











111 
STS MACY11 30A(1052; 17=SEP=79 09:55 PAGE 347 


CQKDA=E KD11=-K BASIC LOGIC TE 

CQKDAE .P11 17=SEP=79 09:47 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0345 
15652 15656 156584 15689 

$TPB 001052 9134 16199 16210 

S™PFLG 001057 9174 16148 16270 

SIPS 001050 9124 16197 16210 

STRAP 063172 4418 4635 163554 

STRAP2 063214 163664 16377 

$TRP = 000005 16370M 163794 163804 163814 163824 

STRPAD 063226 16360 163774 

STSTM 000704 8674 

STSTNM 001002 8904 15935 15949" 15991* 15992 15997 15999 16005 16040 16071 

STYPBN= *eeeee () 16382 

STYPDS= xeeene |) 16382 

$TYPE 062214 161484 16320 16370 16378 

STYPEC 062426 16178 16185 16192 1619784 16198 

STYPEX 062474 16203 16205 162084 

$TYPOC 062522 162414 16379 

$STYPON 062536 16240 162434 16381 

STYPOS 062476 162364 16380 

001132 94748 

SUNITM 000710 8694 

SUSWR 001144 9544 

SXTSTR 061354 159604 

$$GET4= 000000 157224 

SOFILL 062721 16237* 16241* 16251 162864 

S4OCAT= weeeee 15957 16047 

. = 070040 8394 8434 8484 854 8554 8574 859" 875 8764 8784 8804 8874 936 
2308 2749 2969 3701 4210 4935 5808 6660 7516 8331 9252 10037 10907 
11719 12418 12629 12660 12691 {2722 12753 12773 12788 12820 13913 14864 14936 
15730 137318 15752 15779 16004 . 16005 16071 161214 16210 163414 164054 16589 16590 
166124 171104 171324 

-SASTA= eeeeee YJ 16293 16296 

. $x = 000700 8544 859 


CQKDA=E 
CQKDAE. 


COMME N 
ENDCOM 
ENDERR 
ENDPAS 


ENDSCO 
ERROR 


ESCAPE 


J 
MACY11 30A(1052)_ 17=SEP=79 


14 
09:55 PAGE 349 
CROSS REFERENCE TABLE -= MACRO NAMES 


oo 
ark 
——.0on 
as fwny 


Oo 
co 
— 


NOWWO 
* 
wn 


oa 


&UINON 
= HONE WVO-] NO UNO 


WHE BSCE 

NVIDO 
WINNINMINMN = ee eS Sr OO 
WW? DUYIW— ONUS WOO 
00 F DOOWWOUWUIW 
NM YUOWNM AAO OM0O 


o 
S 


il eed ce eed ee cd ed ce ce ce ce ed dd ee i ce ed oh es ed ed 
. > io) > °) 
alo 
it: Z 
Onn 


ee en ne ee ee ee en ee ne ee ee eee ee 
oOo 
ee ee ed ee ee ed ee ee dd en eed ed ed ed eed ed 


WINE 
i a a ab ed a ead ah ab ed a eh ad od 


WWE & EB WWWRNND 2 SS OS OO 
MIWO NS RHA SM OUIWW ONDA SW 
_ 
- > 


890 


NOVUW— 
oO 
nw 


963 


8 


lh nana il enh ili alt al ai al ail ali ial al alia bad 
freooon 
—. 
Mm-HwW 


MME & ES AWANWIDOIOD RR MP MP MO 


AWONYIWN 


10694 
10924 
191 


Soa2% 
—wWw-O 
Oe =r 


mm kd ed ed aed od od =) oJ = 


a te 
Owe 


5 lies ane 


| 


SEQ 0346 


g 


MmLMO 
MLUNNO 


NN ee anon 
Wing 
WN MOANING 


rs 


K 11 
STS MACY11 30A(1052) 17=SEP=79" . 55 PAGE 350 


CQKDA=E KD11-K BASIC LOGIC TE 

CQKDAE .P11 17oSEP=79 09:47 CROSS REFERENCE TABLE == MACRO NAMES : SEQ 0347 

GETPRI tl 8378 

GE T SwR a 837 

MSG 4575#@ 4577 128324 12834 128764 12878 136024 13604 138594 13861 13982 13984 14042 14044 41\024 
14104 141624 14164 14222 14224 142674 14269 146804 14682 151574 15160 152184 15221 152884 18391 
15325 15328 154034 15406 154424 15445 155644 15567 

MSGJ 149014 14903 

MSGM1_ =: 1493 14941 

MSGM10 15035# 15038 

MSGM11 150704 15073 

MSGMS 149908 14992 

MULT 4 8374 

NEWTST a4 8374 1949 1962 1976 1988 2002 17 2031 2048 2064 2081 
2161 2180 2 2216 2239 2262 2279 2301 2327 2357 2376 2394 


9 8716 8747 8773 8799 8825 8851 8872 8893 8925 57 
5 9132 9169 92 9243 9284 9321 9353 9385 9417 9449 9470 
9555 9576 03 9631 9651 9670 9694 9718 9 9766 9793 9820 
9913 9957 9979 10001 10028 10059 10086 10113. 10141 10168 10195 
10335 10364 10393 10421 10450 10479 105C7 10534 10561 10589 10616 
10723 10750 10779 10808 10838 10868 10898 10932 10962 10992 11021 11040 
11127) 11149-11177 1193 11214) -11236) 11257) 11279-11301): 11323): 11350): 11372 
11483 11513) 11539-11565) 11591-11627): 11651 11679-11710) -«11739 11764 =: 11793 
11919 =11953) 11969) 11996) 12015.) 12034 «= 12053) 12072) 12113) Ss 12150) )9—s- 112187) 12247 
12367 81239 12429 §=12462) = 124695, 12552. 12609) = 12640) )=s 12671 Ss :12702)—s «112733 =: 12764 
12963 12983 13023 13061 13086 13111 13136 13160 13199 13237 13289 13349 
13503 13526 13549 13571 13602 13639 13674 13709 13735 13762 13789 13819 
13929, 13945) 13962) 13982. 14042) = 14102) 14162) 14222 14267) 14311 14341 14372 
14516 91454714571 = 14600) 14629 14658 = 14680) 14726) = 14750) 391477514799) 14827 
14990 =150 15071-15158) = 15219 15289 «15326 = 15404 = 15443) 15565 =: 115652 
NOINST 12734 11972 12056 13712 13738 13765 13792 13822 14014 14074 14134 14194 
14344 14375) 14411 14447) 14483 14519) 14550) 3=—- 14574 = 14603) 14632.) 14661 = 14802 
NOSCOP 1273 1952 1965 1979 1991 2005 2020 2034 2051 67 2084 2106 
2183 2202 2219 2242 2265 2282 304 2330 2360 2379 2397 2413 
2491 2512 2533 2555 2579 2602 2625 646 2662 2681 2699 2722 
2789 2814 2839 2858 2882 2905 2921 2939 2965 2993 3011 3029 
3104 3122 3141 3173 210 3247 3284 3321 3346 3371 3 3422 
3526 3548 3571 3607 3643 3661 3679 97 3720 3736 3764 3778 
3851 3865 3880 3895 3910 3925 3940 3955 3969 3984 3999 
4058 4073 4088 4114 4132 4149 4185 4206 4230 4261 4283 4323 





L 11 
CQKDA-E _KD11-K BASIC LOGIC TESTS MACY11 30A(1052)_ 17=SEP=79 09:55 PAGE 351 
CQKDAE .P11 17=SEP=79 09:47 CROSS REFERENCE TABLE == MACRO NAMES 


8374 15764 16335 16336 
14951 15046 15088 15166 15229 15296 15337 15414 15455 15580 
16296 16298 


SEQ 0348 


1 1 
1 1 
1 1 
1 1 
1 1 
1 1 
1 1 
1 1 
1 1 
1 1 
1 1 


LEWWAN 22S 





M11 
CQKDA=E KD11-k BAS MACY11 30A(1052) 17=SEP=79 09:55 PAGE 352 
CQKDAE .P11 17=SEP= : CROSS REFERENCE TABLE == MACRO NAMES 


9952 
359 


rs 
~m 
oO 
ve] 
oO 
oO 


nN— 
RSs 
Vin 
ROAREEG@ 
¥RS.af 
Ooo 
me ae ad od od od od 
Oo 
a oH — 4 4 -4 — 4 
—~» —) —s —» —4 4 — > 14 — a 
4 4 — 9 9 -4 - 49 - 4 
-—2) 4 —2 —4 —> —4 —4 —4 4 4 
4 2 4 4 — 9 a — 4 
—) 4 —4 49 —4 —4 —4 — 4. 
& fn HS SHS HS OOO 
NWR OMEN OUH 
NOOO , tae 
me td od od od od 
& HOR mS HS -2 OOO 
_— St et 2 


S OonLrWO 
eos 3s8 
WOK SWO 


* 
oO 


nt aed and ed el cael cel ee ed eed 
SOW 
ANO 


a a ce ae ce cel ced ced ce eed 
yo? 21.8) e 


Ww 
Ww 


885 
8374 


8374 
1990 








MACY11 30A(1052) 
CROSS REFERENCE TABLE -~ MA 


CQrDA=£ KD11-K SASIC LOGIC TESTS 17=SEP=79 


17=SEP=79 09:47 


2% 
Oo 
N 
re 
WM OW OM ON 


SAE 
Ww 
UIIWWUITOWG 
FAROASS 
WOW ONSW- 
ANAM wor 


wo NN 
—WUVIWODA £-MO 


WWWnrn 
— 
we — 
me ee ee eed ed od 
KRIBRNSaS RS 
WW 
WO OWN 
—_ 
WWW = = = =O 
NERS WAWOOOA RNG 
S3ng Wo 
ve) co 


UNE SEW 
& 


=O 
on 
so 
fw 


rey ab 4 
WWoO 
NM 
eed ae ee ee ce ed ee ld ce ee et el a a a ee ee eed eed od 


OWO 


96 
20 
00 


9741 
9935 
10115 
10335 
10536 


N 
Ww 
oO 


673 


cbuiciatabwbnbubal ahah abaabiaialal aaa 
USS SWWAWARNNN ee SS MK OO 
N >) 
co 
Ww 


N 1] 
09:55 PAGE 353 
CRO NAMES 


J Ww 
BSSUSAUlASN 
atic tab iubuiatab ube dab aabab adabab 
ovo 
CO WOON WIWOON 


aww tia iuiwwBeabdebat aA aababababataiaD 
MmNDOW Hf 0 - OYUN NO 


me ee ee ee ed ed ed ot = 
MMS & &SWAWAAAPNID Ss SO Oe 
ADVWIWDNUINONS > ONYIW= 
f£@O—- OWN ] HH] SYN O 


an 
Wale loro) 


ROT SEAS fete 
AKERS ow CU 





SEQ 0350 
9847 





CQKDA=E KD11-K BASIC LOG 


B le 
STS MACY11 30A(1052) 17=SEP=79 09:55 PAGE 354 
CQKDAE .P11 17-SEP-79 CRO NAMES 


TE 
747 CROSS REFERENCE TABLE -- MA SEQ 0351 


IC 
09 
12988 13028 13066 #13091 13116 = 13141 13165 13206 13242 13294 13354 13414 13444 13476 #13508 
13531 13554 13576 13609 13644 13679 13714 13740 13767 13794 13824 13866 13894 13909 13934 
13950 13967 14016 14076 14136 14196 14262 14286 14316 14346 14377 14413 14449 14485 14521 
14552 14576 14605 14634 14663 14689 14731 14755 14780 14804 14832 14861 14909 14952 15003 
15047 15089 15167 15230 15297 15338 15415 15456 #15581 15656 
TRMTRP 163704 
TYPBIN a 8374 
TYPDEC a 8374 
TYPNAM 1a 837A 
TYPNUM 4 83% 
TYPOCS 1# = 8378 
TYPOCT a 8374 16089 16113 
TYPTXT 1 8374 


7685 7710 77 7759 7778 7798 7819 7840 7869 7898 7927 7956 7985 
8072 8094 8116 8138 8160 8186 8213 8240 8267 8296 8325 8358 8387 
8468 8495 8522 8551 8580 8608 8635 689 8719 750 8776 02 
8875 8928 8 8992 9024 9061 9135 9172 9209 9246 9287 
g 9420 9473 9494 9515 9536 9558 9579 9606 9654 9673 
9742 9769 9796 9823 9850 9872 9894 9916 9938 9960 9982 10004 10031 
10116 10144 10171 10198 10225 10251 10280 10309 10338 #10367 10396 10424 10453 
10537 10564 1059 10619 10646 10672 10699 10726 10753 10782 10811 10841 10871 
10965 0995 11024 11043 11064 11086 11108 11130 11152 11174 11196 11217 11239 
11304 11326 11353 11375 11407 11433 11464 11486 11516 11542 11568 11594 11624 
11713 11742) =—11767) ‘11796 )=—s- 11829,s«*11861=Ss_s«+11894 = 111922 - 11956 )=—s-« 11999-12018 »3=s: 12037)~——- 12075 
12190 12250 12310 12334 12352 12370 12400 12432 12465 12498 12555 12612 12643 
12736 12767 12803 12838 12883 12966 12986 13026 13064 13089 13114 13139 13163 
13292 13352 13412 13442 13474 13506 13529 13552 13574 13607 13642 13677 13892 
13948 13965 14687 14729 14753 14778 

SSCMRE 8814 920 921 922 923 24 925 

$SCMT™M 8814 926 927 928 929 930 

SSESCA 14 8374 

SSNEWT 14 8374 1949 1962 1976 1988 2002 2017 2031 2048 2064 2081 2103 
2161 2180 2199 2216 2239 2262 2279 2301 2327 2357 2376 2394 2410 
2 2488 2509 2530 2552 2576 2599 2622 2643 2659 2678 2719 
2769 2786 2811 2836 2855 2879 2902 2918 2936 2962 9 3008 3026 
3085 3101 3119 3138 3170 3207 3244 3281 3318 3343 3368 3393 3419 
3497 3523 3545 568 0 3640 3658 76 3694 3717 3733 3761 3775 
3818 3 3848 3877 3892 3907 3922 3937 3952 3966 3981 3 
4040 4055 4070 4085 4111 4129 4146 4182 4203 4227 4258 4280 4320 
4404 4426 4445 4469 4490 4518 4539 4557 4575 4655 9 4683 4703 
4767 4781 4796 4811 4826 4841 4855 4870 4885 4900 4926 4947 4973 
5059 5103 5129 5155 5207 5234 5260 5286 5312 5339 5 5393 








C 12 
CQKDA=E KD11-K BASIC LOGIC TESTS MACY11 30A(1052) 17=SEP=79 09:55 PAGE 355 
CQKDAE .P11 17=SEP=79 09:47 CROSS REFERENCE TABLE == MACRO NAMES SEQ 0352 
7480 7507 7533 7559 7580 7607 7634 7658 7682 7707 7731 7756 7775 7795 7816 
7837 7866 7895 7924 7953 7982 8011 8040 8069 8091 8113 8135 8157 8183 8210 
8237 8264 8293 8322 8355 8384 8411 8438 846 8492 8519 85 8577 8605 8632 
8659 8716 8747 8773 8 8825 8851 887 8893 8925 8957 8989 2 8 
9132 9169 9206 9243 9284 9321 9353 9385 9417 9449 9491 9512 9533 
9555 9576 9603 9631 9651 9670 9694 9718 9739 9766 9793 9820 9847 9869 9891 
9913 993 9957 79 =©10001 10028 10059 10086 10113 10141 10168 10195 10222 10248 10277 
10306 10335 10364 10393 10421 10450 10479 10507 10534 10561 10589 10616 1064 0669 10696 
10723. 10750 10779 10808 10838 10868 10898 10932 10962 10992 11021 11040 11061 11083 11105 
11127, 11149) 11177) 11193) 11214) 11236) 11257) 11279 11301) 11323) 11350) 11372) 11404 3=—-11430)S- 11461 
11483 3911513) «11539-11565 11591-11621): 11651) 0S: 11679) Ss 11710 «11739-11764 = 11793-11826) «111858 = 111891 
11919 §=11953) 11969-11996) 12015): 12034) = 12053) 12072) 12113) Ss 12150) 12187) 12247) = 12307 Ss: 12331 3=—s_: 112349 
12367 = 12397) 12429) 1246212495) 12552) 12609) 12640) =: 12671 =: 12702) «12733-12764 += 12800 )3=s:« 12832 Ss: 12876 
12963 12983 13023 13061 13086 13111 13136 13160 13199 13237 13289 13349 13409 13439 13471 
13503 13526 13549 13571 13602 13639 13674 13709 13735 13762 13789 13819 13859 13889 
13929 = 13945 13962-13982) 14042) 14102) 14162) 14222) 14267) 14311 14341) 14372) 14408) 3= 14444 14480 
14516 14547 14571 =914600 914629 14658 14680 14726 14750 14775 14799 14827 14856 14901 14939 
14990 15036 15071 15158 15219 15289 15326 15404 15443 15565 15652 
S$SET 16370 16379 16380 16381 
$$SKIP 14 8374 1957 1971 1984 1997 2012 2026 2044 2060 2076 2098 2120 2138 2156 
2175 2194 2212 2234 2257 2274 2296 2322 2351 2371 2389 2405 2423 2442 2463 
2484 2 2525 547 2570 593 2616 2654 2673 2691 2714 731 2764 2781 2806 
2831 2850 2875 2897 2914 2931 2957 2985 3003 3021 3039 305 3096 3114 3133 
3165 3201 3238 3275 3312 3339 3364 3389 34 3440 3492 3518 3541 3563 
3654 72 6 3712 3728 3756 3770 3784 3798 3813 3828 3843 7 3872 7 
2 3917 3932 3947 3961 3976 3991 4006 4021 4035 4050 4065 4080 4106 4124 
4141 4177 4198 4222 4253 4274 314 4375 4421 4441 4485 4531 4551 4569 4665 
4679 4699 4721 4741 4763 4777 4792 4807 4822 4837 4851 48 4881 4896 4922 
4943 4969 4986 5938 5055 5081 099 5125 5151 5203 5230 5256 5282 5 5335 
5 5389 5416 5442 5468 5494 5520 5546 5572 5 5626 5654 5682 5710 7 
5768 5 5829 5855 5886 5912 5942 5967 5994 6021 6 6072 6098 6124 6150 
6176 6202 6228 253 6279 6305 6331 6357 6382 6408 6434 6460 6512 6 
6564 6 6 6678 6710 6737 6764 6791 6818 6845 872 9 6925 6952 
6979 7006 7033 7060 7087 7114 7141 7168 7195 7222 7249 7276 7302 7328 7354 
ry 7428 7454 7475 7502 7528 7554 7575 7603 7630 7654 7678 7703 7727 
7752 7771 7791 7811 7832 7862 7891 7920 7949 7978 8007 8036 8065 8086 8108 
8130 8152 8179 8206 8233 8260 8288 8317 8350 8379 8407 8434 8461 88 8515 
8543 8572 8600 8628 8655 8682 8711 8742 876 8795 8821 8847 8 8919 
8951 8983 90 9089 9126 9163 9200 9237 9278 9315 9347 9379 941 9443 
9465 9486 9507 9528 9549 9571 9599 9627 9647 9666 9690 9714 9734 9762 9788 
9815 9842 9864 9886 9908 9930 9952 9974 9996 10024 10055 10082 10109 10136 10164 
10191 = 10218 10244 10272 10301 10330 10359 10388 10417 10445 10474 10502 10530 10557 10585 
10612 =10639 10666 10692 10719 10746 10774 10803 10833 10863 10893 10927 10957 10987 11016 
11036 §=11056 §=8©11078 §=11100 11122 11144 11166 11188 11209 11231 11252 11274 11292 11297 11314 
11319-11336) 11346) 1136311368 =. 11385) 11395) 11398) = 1141711422) 1142511443, 11447 11457): 11474 
11479 = 11496) 11506-11509) 11526) 11531 11534 =. 11552 «11557 11560) «111578 )3=—s-«11583 «411586 =: 111604 =—s- 11607 
11612-11615) 11634 =: 11637) 11642) 11645-11670): 111783) Ss: 11812) s:« 111848 )=—s.: 111877, s- 111910 s-:111939 11964 =: 11990 
11993, 12011 §=12030 12049 12068 12105 12142 12179 12206 12214 12226 12235 12266 12274 12286 
12295 12344 = 12362) -13194 = 13232) 13271 Ss 13340) »= 13400 )3=—s:713625 Ss - 113660) )=—s-:« 13695 14258 §=14302) = 14337 = 14368 
es yr 14476 814512 914543 = 14567 = 14596) 14625 14654 14676) 1471914747) 14772) 14796) 14824 
-EQUAT 14 7054 727 
» HEADE 4 7054 706 
-KT11 14 
SE TUP la 


* SWRH I le 705# = =715 







va 
~wr 


ee en ae a ee ee 
CQKDA-E KD11=-K BASIC LOGIC TESTS MACY11 30A(1052) 17=SEP=79 09:55 PAGE 356 
CQKDAE .P 11 17=SEP=79 09:47 CROSS REFERENCE TABLE == MACRO NAMES SEQ 0353 
. SWRLO 7264 
.SACTI 3 7054 871 
. SAPTB 14 7054 9374 
. SAPTH 4 7054 849 
. SAPTY 7 7054 16289 
.SASTA 14 
-$SCATC a 7054 837 
.SCMTA 14 7054 881 
. $DB2D rj 
- $DB20 1a 
.SDIV 4 
. SEOP la 7054 15695 
. SERRO la 705@ 16012 
. SERRT 1a 7054 16075 
. SMULT la 
. SPOWE 4 705@ 15736 
. SRAND 14 
. SRDDE 14 
. $RDOC 14 
. SREAD lf 
.$R2AZ lt 


- SSAVE 14 

° D lf 

- $SB20 4 

- $SCOP lf 7058 15930 
-$SIZE 14 

- SSUPR 14 

. STRAP 14 705# 16347 
- STYPB le 

-$TYPD 14 7054 

- $TYPE 4 7054 16131 
-$TYPO la 705% 16211 
-$400A a 

1170 4 


ERRORS DETECTED: 0O 


CQKDAE .BIN, CQKDAE .LST/CRF /SOL/NL : TOC=CQKDAE . SML , COKDAE .P 11 
RUN-TIME: 183 225 16 SECONDS 

RUN-TIME RATIO: 

CORE USED: 39K (77 PAGES) 





